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Release Date: December 1, 1971 | CR 0602 


This manual documents the software package used in the 
Modular Data Transaction System (MDTS) environment at 
Sears. It does not include documentation on RBSA pro- 
grams or utilities used by Sears. 


All revisions prior to December 1, 1971, have been in- 
corporated into this manual. The revision dates can 
be found at the bottom of each page. 


All documentation of this MDTS software package prior 
to December 1, 1971, 1S superceded by this manual. 


This release contains the following enhancements: 
1. Improvement of criteria testing for ENDAY. 


2. Addition of ATT12 message for logical day 
changing. 


3. SCA partition buffer sharing for transmitting 
and receiving data. 


4. Receipt of any communications option other than 
Function Text Option 2, Option 09%, or Option 
Ynn will cause a buffer reset in the SCA parti- 
tion similar to Function Text Option 1. 


The printing of the Singer-Friden Company 
title, MDTS System software module name, second 
Julian form release date on the console device 
during program loading. 


nn 


6. Correction of all outstanding software problems 
reported prior to this date. 


This software release is compatible with all previously 
released MDTS System support and utility programs as wel] 
as all external referencing programs with the exception 
of the RBSA Series program NFR200 which is being concur- 
rently released with the MDTS System software. 


Release Date: December 1, 1971 CR 0602 
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INTRODUCTION 
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INTRODUCTION 


The MDTS Collective Store and Forward System with Disc Credit Authorization 
operates with a minimum 10K common, 2K partition zero, on SCA partition, 
and 1K for each terminal partition. 


Partition zero monitors all activities, accepts commands for reporting or 
altering data flow, automatically reports status at various points and 
reports machine malfunctions, should they occur. 


The SCA partition handles all communication between the System Ten and a 
host computer. It requires two channels, but is considered one partition. 


The terminal partitions service the point-of-sale terminals by responding 
to a credit inquiry, accepting transactions, and writing the completed 
transactions on disc. They also retrieve transactions during a host poll 
and update the credit file during a host select. 


All partitions have access to the common data areas and routines. Software 


flags prevent simultaneous use of given common routines by more than one 
partition. 


When the program is in normal operation, point-of-sale terminals will have 
first priority for service. A credit inquiry will be answered immediately. 
A transaction will be logged in a core queue. If no terminal attached to a 
particular partition is requesting service, the system will allow that 
partition to write data from the queue to disc. If the queue is empty, the 
system will allow a host computer request to be serviced. 


At the completion of any single task, or upon recognizing no tasks pending, 
the partition in charge releases the system to the next partition. If the 
next partition is a terminal partition, the process is repeated. If it is 
the SCA partition, the system will check for a host command if none is 
currently pending, or will resume execution at the point it released contro] 
if a command is being processed. | 


When control passes to partition zero, a pending service request is acknow- 
ledged and serviced. If no service request is pending, any message passed 
to partition zero from one of the other partitions will] be printed. If 
there is no message, control passes to partition one. | 
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MULTI-PARTITION LOADING 


SECTION 2 


CRO602 


MULTI-PARTITION SYSTEM LOADING 


System loading in a multi-partition environment is accomplished with a 
special CHannel LOad and Execute program CHLOE. Features of this program 
are: 


1. Checking of common size to insure that the size requested is 
available. 


2. Computation of the number of blocks of core, 100 positions long, 
between the figure provided in CHLOE card 0002 and the upper 
limit of common less six blocks. This figure is placed in core 
positions 300-301 of common. 


3. Computation of a figure, 200 core positions below common maximum 
and placement of that figure in core positions 302-303-304-305 of 
common. 


4. Placing the number of a partition in core position 45, 46, 47 and 
48 of the partition. 


5. Placing five times the number of a partition in core position 25, 
26, 2/7 and 28 of the partition. 


6. Placing three times the number of a partition in core position 35, 
— 36, 37 and 38 of the partition. 


7. The ability to load any program ‘into any partition or the same 
program into all partitions. 


8. The ability to automatically cycle any partition that is not loaded. 
9. The ability to request loading into non-existant partitions. 


10. Automatic execution of programs commencing with partition zero upon 
completion of loading. 


Restrictions of this program are: 


1. Operates in an environment which includes at least one partition 
besides partition zero. 


2. The first existing partition after partition zero cannot be an MTIOC 
type. (It must execute a recovery instruction at position zero when 
forced into a LOAD state instead of issuing a read control). Other 
partition following the first existing partition can be any types 


3. Partition zero will start at position 0300 unless the ST6 card is 
modified. All other partitions must begin at position 0000. 


4. The conmon program to be loaded cannot insert any data or coding 
below position 320. These 20 positions are available for labeled 
work areas. | 
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5. The partition zero program, to be loaded, cannot insert any data 
or coding below position 300. | 


The system to be loaded into the multi-partition environment is first 
assembled and the output intermixed with CHLOE. Only the output cards 
designated T are used and all other types from the assembly are to be 
discarded including the S type card(s). 


CHLOE text cards 0001 and 0002 may require modification for various system 
configurations. 


CHLOE card number 0001 designates, in columns 8 and 9, the amount of 

- common core required for proper program operation. Comparison is made 
of this figure to the actual amount of common area available and an 
error message is written if the common area is not sufficient. 


CHLOE card number 0002 designates in colunns 8 and 9, the first two 
digits of the queue starting address plus 6. This is utilized in 
determining the block count of the queue and reserves three blocks 

in both front and rear for overflow purposes. The queue must start 

on an even hundred integer as the number of blocks is established from 
the first two digits. The queue maximum pointer, INPXA, is also 
established at 200 core positions below the coninon maximum. 


If using the HDTS Basic CHLOE Loader, CHLOE], text cards 0001 and 0002 will 
be immediately preceded by the STl, ST2 and ST3 cards. These three cards 
comprise a re-entrant bootstrap for loading CHLOE and portions of the user 
program from any IOC device (card reader, 7102 paper tape reader, etc.). 
These cards must be present when using wither the HDTS Bootstrap to Disc 

or Bootstrap to Magnetic Tape. They are replaced by the ST card when using 
DHF CHLOE, CHLOES. 


CHLOE card number ST4 designates which partition or partitions are to be 
loaded with the assembly output which would immediately follow. Columns 40 
‘through 59 indicate partitions 00 through 19 and a flag (1) in the partition 
position will load that partition. 


A separate program may be loaded into another partition by inserting another 

ST4 card immediately prior to the new program. Partitions do not have to be 
loaded with program but may not have more than one program assigned. Partitions 
which are not loaded with program will be given an automatic cycling instruc- 
tion so that they will not interfere with other partitions. Any attempt to 

load more than one program into the same partition will print an error message 
and terminate the loading program. 


CHLOE card number ST5 indicates that partitions 1 througn 19 have been loaded, 
if they were requested, and that the data for partition 0 and/or the common 
area follows. 


CHLOE card number ST6 is the last card of the sequence and terminates the 
multi-partition loading process. | 
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The following illustrations and supporting examples describe the dack contents 
for systems prograns to be loaded with CHLOE from any media. Normally the 
— system program deck is separated into its various partition programs and the 
appropriate CHLOE program and CHLOE control cards inserted as required. Tho 
-— card deck thus arranged can be converted to paper tape at this point if nec- 


essary. The section following the illustrations describes how the system 
program is loaded. 
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BASIC CHLOE LOADER 
CARD DECK FORMAT 


ST6 card 
(see ST6 example) 


Partition @ 
Program 


ST5 card 
(see STS example) 


User Program "A" 
ST4 card | 
(see ST4 example) 
CHLOE text 
cards 
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CHLOET 
MOTS BASIC CHLOE 


S16 card 
(see ST6 example) 


User Program and 
. CHLOE Controls 


Lo / 


CHLOE 


STI, ST2, ST3 
(see ST examples ) 
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CHLOE3 
DMF CHLOE LOADER 


be | 


Optional if controls come from | Coe 
card reader and this is the jee ee oe ee Unit Seperator ! 
last program for FILEing. 3 ! 


ST6 card — | 
(see ST6 example) 


User Programs and 
CHLOE Constants ' 


CHLOE3 
(special DMF 
CHLOE ) 


S19 card 
(see STM example) 


~~ a a — ae ae ER ee eee 


( FILE xxxxxx 


~ 
Se 
°. 


ptional only if control 
nput is from cards. 


— © 


NOTE: Follow DMF FILE procedures for the system. 
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CHLOES 
MDTS BOOTSTRAP TO DISC 


ST6 card 
(see ST6 example) 


CHLOE] 
ST1, ST2, ST3 
(see ST examples ) 


MDTS card to disc 
: bootstra 
(8 cards) 
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CHLOE? 
MOTS BOOTSTRAP TO TAPE 


ST6 card 
((see ST6 example) 


User Program and 
CHLOE Controls 


CHLOE] 


ST1, ST2, ST3 
(see ST examples) 


IMDTS card to tape 
bootstrap 
(8 cards) 


2-8 
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STP CARD EXAMPLE 
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.é | Card Columns Contents 
1-5 S card format and address used to execute the Inhibit 

| Switch mode instruction and branch in this card. 
6-10 Not Used 

11-25 Inhibit Switch Instruction and Branch to loader. 

26-30 | Not Used 

31-77 Comments 

"78-80 STD 
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ST1, ST2, ST3 CARD EXAMPLES 


These cards are the loader cards which will load the CHLOE loader. They are generated separately 
from CHLOE and added to the CHLOE deck prior to distribution. 
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ST4 CARD EXAMPLE 
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Card Column Contents 
1-39 Comments 
40-59 Flag positions which represent the possible 20 partitions 


of the system. A one (1) in one or more of these columns 
will result in the program following the ST4 card being 
loaded into the corresponding partition. i.e., column 41 = 
partition 1, 42 = partition 2, etc. A zero (@) will not 
load the corresponding partition. | 


60-77 Comments 
* 78-80 ST4 


Note: Partition # cannot be loaded by the ST4 card. Non-existant partitions 
will be bypassed without generating load errors. | Existing partitions 
not requested to be loaded will be automatically loaded with a cycling 
instruction only in position 9 of the partition. 
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STS CARD EXAMPLE 
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Card Columns | Contents 
1-77 Comments | 
78-80 ST5 


Note: The ST5 card is used as a flag to the CHLOE Loader to state that all 
available partitions above zero have been loaded, and that the program 


otal the ST5 card is to be loaded into Partition Q and Common | 
ore 
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ST6 CARD EXAMPLE 
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Card Columns _ Contents 
Pr 1-5 S card execution address for this card. 
Cc 6-10 Not Used 
11-50 Instructions used by CHLOE to print the message in card 


columns 61-70 to show that program loading is complete. 


51-55 The starting address of Partition 9. This must be the 
first five machine language characters of an unconditioned 
branch to the starting location desired. This address is 
available for user modification. 


_ 56-60 | Not Used 
61-70 Message to be printed signifying loading complete. This 
message may be user modi fied. 
71-74 > Constants used by CHLOE. 
75-77 | Not Used 


78-80 | ST6 


Note: The ST6 card signifies that loading is complete and automatically ex- 


ecutes Partition @. The ST6 card contents is different for the Basic 


ee and the DMF CHLOE. The example used is the ST6 for the Basic 
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MOTS Program Loading 


The MDTS program may be loaded in one of four ways ewer + upon the media and 
method used for program storage. 


A. Program stored using the Disc Managenent Facility librarian functions. 
B. Program stored on disc utilizing a special MDTS bootstrap. 
C. Program stored on magnetic tape utilizing a special MDTS bootstrap. 
D. Program stored on other media such as cards or paper tape. 
The CHLOE (CHannel LOad Execute) multipartition system loader is used for 
_@ach method of loading. 
A. Program stored using the Disc Management Facility librarian functions. 
1. Initiate the Conversational Loader by securing a LOAD condition in 
partition zero on the attached device zero console and completing the 
subsequent read from the console by either: 


a. _ Depressing the ENTER key on the workstation. 


b. Simultaneously depressing the Control key and the Question Mark 
key on the 7102 Communication Terminal. 


or c. Keying in ten zeros on either device. 

The Conversational Loader will respond with: A) ENTER PROGRAM NAME 
2. Key in MDTS and complete the read from the console by either: 

a. Depressing the ENTER key on the workstation. 


or b. Simultaneously depressing the Control key and the Question Mark 
key on the 7102 Communications terminal. 


The CHLOE loading messages and appropriate system messages will print 
as the program is loaded. | 


B. Program stored on disc utilizing a special MDTS bootstrap. 


1. roe a LOAD condition in partition zero on the attached device zero 
console. 


2. Key in the following special bootstrap: 
PADD 1 DPPLD 


The CHLOE loading messages and appropriate system messages will print as the 
program is loaded. 
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® . 


C. Program stored on magnetic tape utilizing a special MDTS bootstrap. 


1. Mount the program tape on tape drive 2. 


2. Secure a LOAD condition in partition zero on the attached device 
zero console. . 


3. Key in the following special bootstrap: 
ZAI AAD8P 


The CHLOE loading messages and appropriate system messages will print 
as the program is loaded. 


D. Program stored on other media such as cards or paper tape. 
1. Ready the program in the appropriate reader. 


2. Secure a LOAD condition in partition zero on the attached device 
zero console. 


3. Key in the following special bootstrap: 
dpp1plppsy 
where "d" is the reader device number. 


The CHLOE loading messages and appropriate system messages will print 
as tne program is loaded. 


CHLOE Loading Messages 
A. Normal Loading 

SW NRM 
This message indicates that the CHLOE loader is beginning to load 
remote partitions. If a subsequent message does not follow immed- 
iately, verify that the MODE SELECT switch on the display panel 
is turned to NORM. 

C SIZE aaaa QLIM bb INPXA cccc 
This message indicates the completion of the conmon core evaluation. 
"aaaa" indicates the amount of core ‘allocated to common. (99=10K) 


"bb" indicates the number of blocks allocated to the comnon data queue. 


"cccc" indicates the data queue maximum block pointer. 
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PAR LOD OxXxxxxxxXxXXXXXXXXXXX 


This indicates the partitions requested to be loaded. 


x= indicates no request. 
x=] indicates a request. 


Non-existant partitions may be requested for loading and will show 
in this message. Existing partitions not requested will be loaded 
with a cycling instruction. 

XXXXXXXXXX (Load Complete Message) 
This message is printed on completion of reading and executing the 
ST6 card of the CHLOE Loader. The message may contain from one to 
ten System Ten characters, and is a part of the ST6 card itself in| 
columns 61-70. (See ST6 card Example Section 2 page 13 of this 
manual. ) 

B. Error Messages 

Three error messages are: 


1. "RD ST" to indicate a read status error. 


2. "C SIZE NOT" to indicate insufficient common area available accord- 
ing to CHLOE card number 0001. 


3. "LOAD REQ ERR" to indicate a load request error of either not a 0 


or | in columns 40 thru 59 of the CHLOE ST4 card, or a request to 
load a program in a partition already loaded. 


System Messages 


A. Program Identifier 


The system will first print a program identifier message. The identifier 
format is: 


"SINGER-FRIDEN MDTS SYSTEM" 
ppvvll-yyddd 


pp = Program Mnemonic ~ 

vv = Version Number 

11 = Level of Distribution 
- = fixed dash 

y = Year 

ddd = Julian day 
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B. Partition Check-In 


Each partition properly loaded will report in with ATT9. 
The ATT£9 format is: 


ATT£9 UPSQPPPnnr 


nn is the partition number 
r is a residual character 


C. Special Messages 


If a clock partition is present, a Clock Stopped message is printed at 
the initialization of the system. The Clock Stopped message format is: 


CLOCK STOPPED AT dddhhmmss 


ddd = Julian Day 
hh = Hour 

mn = Minute 

ss = Second 


To initialize the clock, follow the console instructions specified in 
item H, Section 5, page 2 
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CONSOLE MESSAGES 


The 7102 Communications Terminal is attached to partition zero and various 
messages are passed to it from tne other partitions via a common buffer. 
Partition zero examines this message buffer and prints it when filled. 


Messages are 2/7 cnaracters long formatted with a standard 5 character tag © 
followed by up to 22 characters of data relative to the tag. For example, 


a disc read error will have a 5 character tag followed by tne 6 character 
disc address where the error occurred. 


Tne ‘messages are separated into three categories; Attention, Warn, and Error. 
In general, the "Attention" messages indicate the completion of a command 
Such as a transmission to the host computer. The "Warn" messages mean that 
something did not happen as expected, such as an attempt to delete a non- 
existing account number from the credit file. The "Error" messages indicate 
that an error has occurred such as a disc I/0 error. : 
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ATTENTION 


ATTP1 - This message indicates a successful transmission of a transaction 
file to tne host computer. Accompanying the ATTQ1 tag is a 14 cnar- 
acter code number for the data just transmitted and a 6 character 
count of the number of transactions sent. The code number must be 
entered for all subsequent resends of these transactions. The for- 
mat of the ATTQ1 message is: 


ATT#1 bbbbbbeeeeeepp ccccc 


bbbbbb = beginning disc address for this transaction 


file. 
eeeeee = ending dist address for this transaction 
file. 
pp = the picture address. This is the even sector 


of an even/odd pair in the home track that 
. contain the picture data for this transmission. 
ccccc = the character count of tne number of trans- 
_ actions sent. 


ATT#2 - Tnis message indicates the receipt and completion of an option 6 
command from the host computer. This means that the credit file has 
been cleared and reinitialized and the system is ready to receive a 
new credit file. This message will appear when initializing a disc 
pack without host involvement. (See ATTQ5.) 


ATT$3 - Attention 3 indicates the completion of the building of a credit file 
or the completion of a series of on-line updates to the credit file. 
Accompanying tne ATTQ3 tag will be a 6 digit count of the account nun- 
bers now on the credit file followed by 12 digits indicating the disc 
address for the beginning and ending of the credit file. The format 
of the ATTQ#3 message is: 


ATTQ3 cccccc bbbbbbeeeeee 


cccccc = count of the account numbers now on the credit 
file. 

beginning disc address of the credit file. 
ending disc address of the credit file. 


bbbbbb = 

eeeeee = 

ATT@4 - This message occurs in standard MDTS Systems upon normal loading of 
the software in the System Ten partitions. It is a request for oper- 
ator determination of the status of the disc pack mounted on drive 
number zero. Only one of the following replies will be accepted by 
the MDTS System before system loading can complete: 


NRMLD This reply implies that a disc pack that has been previously 
initialized to MDTS System specification is mounted on 
disc drive zero (see MDTS System Initialization Program 
Documentation). 


DINTL This reply states that the disc pack on drive zero has 
not been initialized to MDTS System specification. The | 
"MDTS System will then proeeaen to request system parameters 
(see iia 
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‘ATTENTION = (CONT) 


ATT@5 - This is a request for entry of MDTS System initialization parameters. 
It is generated when DINTL is used as a response to the ATT£4 message. 
If the MDTS System Initialization Program is not available to the user, 
the required parameters may be entered on the console device at this 
time. 


NOTE Extreme caution is advised if MDTS System initialization para- 
meters are entered via the DINTL and ATTQ5 request as the para- 
meters are not edited for validity and integrity. The support 
program, MDTS System Initialization Program, should be used for 
parameter entry to insure accurate system initialization. 


Parameters entered via the ATT95 request must be in the exact order 
they are presented in the FILCON description in Section 7 of this 
manual. When tne last character has been entered, the MDTS System 
will display them on the next console print line and it will accept 
the parameters only if the letter "Y" is entered on the console 
device. If any other reply is entered, such as "N", the MNDTS System 
will repeat the ATTQ@5 request for parameters. 


When the parameters are accepted, the liDTS System will commence 
clearing the disc area specified for use as the credit file area. 
(see ATT11) and initialization is complete. 


a. ATT~6 - This is an indication of a break in the normal communication sequence 
C with the NOSws The format of the ATTQ6 message is: 


fff =-1 to 3 digit (as applicable) of the function command 
that was active. 
aaaa = the core address of the I/0 insevuckion which 
faulted (timed-out). 


WiiIIII1i71 = the actual instruction which faulted. 


ATTQ7 - This indicates the completion of the ENDAY option. Accompanying the 
ATTQ7 tag will be two digits indicating the new day number. The 
format of the ATTQ7 message is: 


ATTQ7 dd dd = the new day number. 


ATTQ#8 - Attention 8 indicates an orderly close of the system. This message 
must follow a "SYSDN" command. It means that this disc is closed and 
all parameters updated appropriately. No terminal transaction or host 
commands will be accepted. | | 
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ATTQ9 


ATTI9 - 


ATT}1 - 


ATTI2 - 


10-11-77 


ATTENTION (CONT) 


- This indicates a pass through position 9999 of a partition. The 10 
cnaracters at position 40 of the partition are also reported. The 
format of the ATTQ9 message is: 


ATTQ9 kaaalppppd 


k 
aaal 


size (K) of the partition. 

address of the instruction +1] (+1 if an I/0 being 
executed at the time of tne check. The zone bits of - 
characters "aaa" indicate the condition code Flip- 
Flops of "CARRY", "MINUS", and "ZERO" and the zone 
bits of character "1" indicates the location of the 
instruction (partition or common). 


If there was no ACU check condition, “aaal" have no 
relevance. 

= the partition number where the recovery occurred. 

= the last device that received an BER ONE Oeneae for 
service by the processor. 


PPpp 
d 


Indicates completion of host initiated reset of any communications 
routines in progress. 


This message indicates that the system has been directed by the 
operator or communications to clear the negative credit file. The 
credit file cannot be accessed until an "ATTQ2" message is typed on the 
console monitor which indicates the completion of the clear function. 


This message informs the operator that the ENDAY command cannot be 
automatically serviced because one or more point-of-sale terminals 
is not closed. The complete message format is:. | 


ATT12 ALL TERMINALS NOT CLOSED 
*xx* yyyyyyyyyy*™ 
More tnan one line may print, as required. See description 
of STATE command (Section 5) for "xx" and "YY - ." definition). 
REPLY YES TO OVERRIDE OR NO -- | 


The operator may reply "YES" and the condition will be overridden. 
Any other response such as "NO" will cause the MDTS System to 
resume normal cycling, having taken no action. 
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WARNING 


WRNQ@1 - This message indicates the approaching end of the transaction 
| file. It is accompanied by a two digit number indicating the 
~ number of tracks left before encountering WRNQ2. 


WRNQ2 - This message means that the last available track has been reached, 
and any data in queue is logged on disc. The disc will accept no 
further transactions until the system has received an option Q 
command from the host and sent the transaction data. The WRN@2 
tag is accompanied by 2 digits indicating the number of tracks 
reserved to write data left in queue when encountering WRNQ2. 
Credit authorization will continue, but transactions will be 
blocked. : 


WRN@3 - This indicates an attempt to delete an account number not on the 
file. It is accompanied by the account number received. The 
number is ignored. Normal processing continues. 


WRNQ4 - This indicates an attempt to change the credit status of an account 
number not on the file. The number accompanies the tag and is 
ignored. Normal processing continues. 


WRN@5 - Warning 5 means that an attempt to add to the credit file has not 
been successful because the overflow area is full. The number _ 
accompanies the tag and is ignored. Normal processing continues 
and other additions may very well be successful because not all 
additions will be going to the overflow area. 


WRN9O - Warning 99 is generated by the occurance of a track check while 
trying to read the disc. The sector address is printed with this 
warning. If the second read of the sector yields the same result, 
the disc address printed is incremented by one and the read tried 
again. This logic is used because the disc arm position cannot 
be program verified. The procedure of incrementing the disc address 
allows access of the desired track only, and in the event of parity/ 
track checks on all sectors of the given track, a loop is entered 
preventing access of the disc until operator intervention. This 
condition is detected by unending "WRN99" messages on the console 
device for the same track. 


10-11-71 wae: | C R-0602 


ERR@1 - 


ERR@2 - 


ERRQ3 - 


ERR@4 - 


ERR@5 


ERRQ6 


ERRQ7 - 


ERRI9 - 


10-11-71 


ERROR 


Error 1 is a parity error or LRCC mis compare on a disc 1/0. The 
program will retry ten times and, if there is no change in status, 
report ERR@3 for the same address before beginning an error re- 
covery procedure. The disc address accompanies the ERR@1 tag. 

The condition code is a 1. 


This message indicates the transmission of invalid characters for the 
credit file. The data sent accompanies the ERR@2 tag. The data is 
ignored and normal processing continues. 


Error 3 indicates a bad sector on a disc I/0. If the instruction was 

a "WRITE", hardware will have written a bad sector blot on the sector. 

If the instruction was a "READ", hardware would have detected a bad 
sector blot from a previous write. Subsequent "READS" will always re- 
turn a bad sector status. Subsequent "WRITES" may be successful, at which 
point the sector is available for normal use. The condition code is a 

3. | 


This message indicates that a disc 1/0 has returned a "drive not available” 
status. The system waits at the I/0 instruction until the drive becomes 
available. The disc address accompanies the ERR@4 tag. The condition 
code is a 4, 


This will indicate the recovery of bad data from the disc during a send 
of the transaction file to the host. The data on the disc is checked 
for the terminal's transmission start code "P" and a valid 1, 2, or 3 
block count. 


The ERR@5 tag is -accompanied by the disc address being sccesced and the 
invalid portion of the data on the disc. 


This message indicates that data in queue is in error. The validity 
check here is on the block count. The data is reported with the ERR#6 
tag and ignored. Normal processing continues. 


This indicates that no proper data was found in the file parameters of 
the picture which had been requested by the host as a resend. The host 
computer will receive a normal '*END' message and the ATT@1 message is 
reported at the console with the non-numeric data Fol lowing the ATT@1. 


This indicates that improper data has been entered from the console 
during a TRACE - DDUMP or service request. | 


This error occurs when the Host computer has attempted to transmit credit 
numbers with the transmission length either exceeding or being less than 
the required number of characters expected. The MDTS System will "NAK" 
the Host and attempt to reread the transmission. If a second failure is 
encountered the transmission is accepted and discarded as invalid. Those 
Characters received from the transmission are printed with the error 
notation. | 


This indicates an attempt to communicate from another eanpuiee without 
the proper identification. The identifier of the other — is dis- 
Played following the ERRI9 tag. 
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ERROR 
CLOCK STOPPED AT *DDDHHMMSS - 


This message indicates that the software clock has stopped and no further 
— transactions will be accepted by the system from any terminal. 


REENTER TIME - 


This message indicates that the previous time entry did not fall within 
the proper pornenene: 
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WORKSTATION COMMANDS 


Various commands applicable to the MDTS System can be entered through the 
console device to either follow the path of the system, or to alter the 
data flow through the system. These commands are entered only after the 
program is loaded and operational by obtaining a Service Request. 


At the time the Service Request is honored by the System, type one of the 
following five (5) character commands. 


STATE 
PRINT 
ENDAY 
DDUMP 
SYSDN © 
SYSUP 
TRACE 


The above commands, their use, and formats are discussed as follows: 


STATE ~ This command is used to determine which MDTS Terminals are 
active to the System. The format is: 


*xx*yyyyyyyyyy™ 


XX - Partition Number 

yyyyyyyyyy - Ten possible terminals which may be attached to this 
Partition. If the Terminal relative to the position 
Shown is active a 1 will be displayed. If inactive 
-or nonexistent the relative position will be @Q. 


PRINT - This command will print a series of internal accumulators for 
purposes of monitoring the system. The format is: 


*NUQnn*INPaaaa*0PTcccc 


nn = Number of Transaction blocks in the queue. 
aaaa = Address of the next available queue location for terminal 
_ use, : 
cccc = Address of the next transaction in the queue to be written 
to the disc. 


ENDAY - This command will cause the logical day number used in recording 
point-of-sale terminal transactions to be incremented by one. 
This has the effect of ending one logical days transactions and 
causing all subsequent terminal activity to be recorded against 
the next logical day (see DY, DAYNRT, and DAYNRD descriptions in 
Section 7 of this manual). 


The day numbers used may range from 01 to 99 and will start at 
Ol again after 99 is reached. 


% 
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ENDAY- (CONT) 
Successful completion of the ENDAY functions is signaled by 
the ATT~7 message. However, if all point-of-sale terminals 
are not in a "closed" state, the ATT12 message is reported 
on the console device. Completion of the ENDAY function 
will also block all further activity of the MDTS System and 
its terminals until the SYSUP command is entered or the 
System is reloaded. 


DDUMP - This routine will dump the disc to the device required in 
increments of 100 character sectors. Servicing the DDUMP 
command, the System will wait for the proper pangneees to 
be entered. The parameter Format 1S: 


aaaaaadsssss 
aaaaaa = The beginning disc address. 
d = The output device (% is the console device). 


SSSSS Number of sectors to be dumped. 

_ If the parameter above is not all numeric, "ERRQ8" is genera- 
ted and displayed on the console device. See Section 4 for a 
discussion of the Console Messages. 


SYSDN - This command is used to orderly shut the System down. After 
normal completion of the SYSDN command, the System will report 
completion (See ATT@8 in Section 4) and block all terminal 
activity until the SYSUP command is entered, or the complete 
System is re-loaded. 


SYSUP - This command is used to open the System after the completion of 
the SYSDN command. The System will report the completion of the 
command by printing the System Status Sector on the console 
device. 


TRACE - This command allows the selective dumping of transactions to 
the console device. The operator may specify the terminal, 
the number of characters to be printed, the beginning and end- 
ing disc-address. The routine searches the specified disc 
area, prints each transaction logged by the terminal being 
traced and its related disc address. The System returns to 
normal cycling when the operation is complete. 


Servicing the TRACE command, the System will wait for the pro- 
per parameter to be entered. The parameter format is: 


ppicccbbbbbbeeeeee 

pp = Partition Number, Q1- 19 

i = Terminal, 9-9 

ccc = Number of cnaracters to be printed. 
bbbbbb= Beginning disc address for the TRACE. 


eeeeee= Ending disc address. 
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TRACE- (CONT ) 
If the parameter above is not all numeric, "ERR@8" is 
generated and displayed on the console device (see Section 4). 
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DISC ORGANIZATION: 


The disc is organized to efficiently contain three important divisions: 


1. System track 
2. Credit file 
3. Transaction file 


1. The System Track contains key data relative to the credit and trans- 
action files. The first sector contains the System Status Sector; 
the next contains labels for convenient isolation of data fields 
when printing the System Status Sector. (See SYSSS in Data Buffer 
Descriptions.) The remainder of the track contains daily pictures 
in sector pairs. (See TRMZAD and TRMZBD in Data Buffer Description. ) 


2. The Credit File is stored on disc at locations specified at initiali- 
zation. 


Each Sector is organized as follows: 


| ; Possibly 
ocr ACCT # ACCT # UNUSED 


OT: A “ - 


aaa 


LINK poss 


+ Bere qe ee ee 


Each Ps ‘number is randomized to a sector in the credit file. If 
more account numbers randomize to a sector than the sector can hold, 
linkage will be established to an overflow area. 


3. The transaction file location is specified at disc initialization. 
It is a dynamic file to all transactions. A particular day's trans- 
actions are logged consecutively as they enter the system. They 
begin at the first of a track and end at the last transaction logged 
prior to a host computer's signal to send transactions or the manual 
closing of the system, SYSDN or ENDAY. The pointers for a day's 
transaction are logged in its picture on the home track. 
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DATA BUFFER DESCRIPTION 


This is a description of key data areas used in the MDTS program. This 
description is an aid to understanding processing details and tracing 
machine malfunctions. 


SYSTEM STATUS SECTOR (SYSSS) : 


The System Status Sector contains a series of data fields relative to the 
current status of the system. It is stored in common and kept on the 
first sector of the home track (HOMAN) on disc. Any change in the System 
Status Sector in core will activate a routine to restore the new SYSSS 
back on disc. Closing the system with a SYSDN or ENDAY command will write 
the SYSSS on the disc being closed, and opening a system with a SYSUP 

. command will read the SYSSS from the new disc into core. 


The SYSSS is detailed as follows: 


CURPIC - This is the 6 digit disc address of the current picture being 
processed. It refers to a picture in the home track. The 
picture referenced contains the data relative to the actual 
processing being done. It is described under the heading "TRMZA". 


For example, a CURPIC of 000158 means that sectors 58 and 59 of 
track |] contain the data relative to the current processing 
point. Closing the system at this point would write the TRMZA 
buffer into 000158 and 000159 and update CURPIC to 000160. The 
picture addresses wrap-around from the end of the home track, 
000198 and 000199, to 000102 and 000103. The System Status 
Sector is stored at 000100. 


NXPIC - This is 6 characters denoting the day indicator and the basic 
disc address of the next picture to be retrieved to send to the 
host. The first two characters are the day and the remaining 
four are the disc address when preceded with the first two 
digits of HOMAD. Upon receipt of a signal to send, the data 
in this picture is read into TRMZB for processing. 


QBLOCK - This is a 1 character field which blocks the addition of data 
to the queue. It is activated in a WRN@2 condition. Normal 
queue fills will occur with a value of @. 


NXSND - This is the 6 character address of the next data to send to the 
host. It is incremented during the sending process, but is 
always set by the limits indicated in the data referenced by 
NXPIC prior to a send. 


FILCON - This is 61 characters defining various system parameters. 


FILCON is loaded during disc initialization according to the 
following format: 
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FIRAD - This is the first address of the transaction file. 
FIZLIM 


This is the physical limit of the transaction 
file. 


DLI - This is a 2 character constant entered at in- 
itialization indicating the number of tracks 
reserved for transactions following a WRN@1 
condition. 


DL2 ~ This 2 character field indicates the number of 


tracks reserved for data in queue following a 
WRN@2 message. 


DL2 must always have a smaller value than DLI and 
must specify the number of tracks necessary to 
contain an entire queue. 


TTDRST 


This 2 character constant is used to reset a 
counter to allow an efficient use of the TTD 
message during communications. Its value should 
be determined on the basis of machine configura- 
tion (number of terminal partitions) and 
expected communications timing (on-line with 
terminal activity or off-line. 


PRIME - This is a 6 character prime number indicating the 
number of sectors used by the credit file. PRIME 
is used in the randomizing routine to determine 
the actual disc address of account numbers. 


STADR - This is a 6 character disc address indicating the 
beginning of the credit file. 


LOVFL - This is the 6 character disc address indicating 
the end of the Credit File Overflow. It must be 
at least 10 sectors beyond STADR + PRIME. Any 
sector in the normal file (STADR to STADR + PRIME) 
which overflows will log into this area. 


NXLNK - This is the address of the next available address 
in the overflow area. It is initialized at STADR 
+ PRIME. A SYSDN preserves NXLNK relative to 
the data logged on this disc. Option 6, Credit 
File Clear, resets it. 


BDLNK - This is the beginning of a save area in the 
bottom of the overflow area that will be used for 
any bad sectors encountered in the credit file. 
It is set at initialization time. 
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DYNLM] 


DYNLM2 


CICNT 


DY 


NXTBD - This is the 6 character address pointing to the 
next sector available in the bad sector save 
area. 


LDATA - This is a 3 character field indicating the last 
account number in the credit file disc I/0 buffer, 
DATA. See the description of DATA for the method 
of deriving LDATA. 


ACLNT - This is a 4 character field for the account number 
length. The first two digits are the minimum 
length and the last two digits are the maximum 
length which will be accepted and processed. The 
maximum length includes the check digit. 


This 1s a 6 character address indicating the first dynamic limit. 
It is calculated using DL] and NXSND. This is the first dynamic 
limit which, if reached, will create a WRN@] condition. It is 
recalculated each time a picture is sent. 


This 6 character disc address is the second dynamic limit. 
Encountering it will create a WRN@2 condition. It is 
recalculated each time a picture is sent. 


This six character field is the count of credit numbers currently 
on the credit file. 


This 2 character field contains the current day indicator. 


CURRENT PICTURE BUFFER (TRMZA): 


TRMZA 

TRMZAD 
TRMZBD 
FIRSTD 


NXTAD 


TRCNT 
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This is a 10 character field preceding TRMZAD for addressing 
purposes. Its contents do not relate to the picture; only its 
Yength. The last digit must be a zero. 


This is the first 100 characters of a 180 character field indi- 
cating which terminals are currently or have been active for 
this picture. 


This is the remaining 80 characters of the table begun in TRMZAD. 
Each terminal used during this picture has a 1 set in the table. 
Terminals not active are flagged zero. 


This is the first sector of the picture. Transactions sent to queue 
are logged on disc beginning at this address. When the picture 

is closed, this address will become the transmission start 

address in TRMZB. 


This is the address of the next sector to be written. When the 
picture is closed this becomes transmission end address. 


This is the count field for logging transactions on disc. 


1-3 _ CR-0602 


DAYNRD - This is the day indicator for this picture. 


SEND PICTURE BUFFER (TRMZB) : 


TRMZB - These 10 characters are used for addressing only. The last 
character must be zero. 


TRMZAT These 100 characters begin the 180 character table to indicate 


which terminals were active for the picture being transmitted. 


TRMZBT - This is the remaining 80 characters of the table. This table 
and the next three fields are read from the Home Track at the 
picture being sent. Each "1". in the table indicates a terminal 
that transmitted a message to the line concentrator. 


TRSTT - This is the transmission start address. It corresponds to 
FIRSTD in TRMZA for this picture. 


TRLIM - This 6 character address is the transmission limit. It is 
determined by the NXTAD field in TRMZA. 


TRCNT This 6 character field is used to count the transactions sent 


to the host. A transaction is defined as a transmission from 
the MDTS terminal to the queue. A single sale taking 400 
Characters requires 2 transmissions from the MDTS terminal 
and logs as two transactions. 


Cc DAYNRT This is the day indicator which this picture was built to. 


INTERMEDIATE TRANSMISSION BUFFER (MBUFF) : 


MBUFF - A total of 300 characters is used to hold up to three blocks of 
data for a Single transaction. During a send of the transaction 
file, MBUFF is filled with one transaction only. Control then 
passes to a stuffing routine which packs and Formats the data 
in the transmission buffers. 


MBUFF's first 8 characters are always "ccdb111P" defined as follows: 


"cc" is the partition, or channel, to which this terminal is 
attached. 


“d" is the device number assigned to the terminal, determined 
by the connectors to which it is attached on the partition. 


"b" is the number of 100 character blocks (sectors) taken by 
this transaction in storage on the disc. 


"111" is the actual length of the message counting the 7 character 
prefix. 


"Pp" js the beginning code of the transaction. 
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The last character of MBUFF is used for a full - not full flag. The 
SENDTR procedure will put 7 complete transaction in MBUFF and flag it 
full. The STUFF procedure will take it out and flag it empty. 


COMMUNICATION BUFFERS: 


This system is double buffered, having one Conmunication buffer in Common 
and the otner in the SCA Partition. Depending on the function being 
acted on, the buffers may be either Send or Receive buffers. The act of 
send and receive cannot occur simultaneously, thus the dependency on the 
function being performed. 


Associated with the buffer in Common are two flag fields of four (4) 
characters each. One flag pertains to the common buffer, the other to 
the SCA buffer. The first character of each field is a flag stating 
whether or not the associated buffer is full or empty. The remaining 
three positions of each is the number of characters in the buffer. 


TERMINAL BUFFER (INBUF): 


Data comes from the terminal to this buffer before being logged in queue. 
This buffer is located in the partition. The terminal] transmits a 
communications character, a "P", and then a text. The communications 
character is removed so that INBUF effectively begins with "P" and jis 
followed by text. 


C CREDIT AUTHORIZATION DISC I/0 BUFFER (DATA): 
DATA is a 94 character field with a 6 character link address used for disc 
I/O during credit operations. It contains the account numbers relative 
to a particular disc address. The account numbers are packed into each 
sector depending upon the account number length. For example, a 13 digit 
account number length will allow 7 account numbers in 94 characters. An 
8 digit account number will allow 11. LDATA, mentioned in SYSSS, points 
to the last account number. LDATA is 078 in the 13 digit example, 680 
in the 8 digit example. 


The 6 character field called LNKAD is used to link a sector to the over- 
flow area when the sector becomes full. | 


CLOSED TABLE: 


The CLOSED TABLE is a 20 position table preceded by a zero (CLOFLG) that 

is used to indicate which partition is utilizing shared routines. It is 
a software flag used to protect shared routines and data buffers during 

partition switching. 


The table must contain all zeros before a partition can request control 
of the routines. When a partition assumes control, a 1 is moved into the 
table position corresponding to the partition number. To release control, 


a zero 1S moved into the table position which corresponds to the partition 
number. 
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SEND] 


SENDQ 


SENDCK 


STUFF 


HOWDY 


BIEN 


OHELL 


HELLO 


~ UPNDWN 
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BRIEF DISCUSSION OF SHARED ROUTINES 


The SEND] entry point is the master control of the system. 
Entry is made here from each terminal partition that does not 
have a service request. System Ten functions are then selected 
on a priority basis giving queue to disc first priority, then, 
in order on-line credit file changes, transaction file trans- 
mission and rebuilding th2 credit file. If no function is 
pending, the system returns to a check of a service request and 
switches partitions. 


The SENDQ entry point writes data in blocks of one, two, or 
three to the disc. Illegal data is ignored and a message passed 
to the 7102 Communications Terminal. Queue pointers are updated 
and reset to the beginning if the queue is empty. 


This is the entry point for sending data to the host computer 
from the Transaction File. It is used for normal end of day 
sends, resends, and on-line sends. The data is read from the 
file as a single transaction for packing in the transmission 
buffer. 


The STUFF entry point is used after reading a transaction from 
the file. It formats the data properly for transmission. 


HOWDY writes transactions from the queue to the transaction 
file on disc. Disc I/O status is tested and errors reported 
and proper recovery routines executed. 


The BIEN/ADIOS routine increments tne file disc address during 
a transmission of the transaction file to the host. It 
provides for automatic wraparound of the physical limits of 
the files area. 


This routine reports disc I[/0 errors encountered during a 
transmission. Error recovery is handled in the calling 
routine. 


This routine reads a single transaction into memory. Data 
is validated before it is allowed to be formatted in the 
transmission buffers and errors are reported at the 7102 
Communications Terminal. 


The UPNDWN routine will set the dynamic limits of the trans- 
action files area on disc. A warning will be sent when data 
being written from queue reaches a user specified number of 
tracks from a disc full state. A warning and a halt will 
occur when the data reaches a second user defined number of 
tracks from a full condition. (See WRN@? & WRN@2) Data in 
queue will be logged on disc, host computer commands will be 
accepted, and credit inquiries acknowledged, but no additional 
transactions from terminals will be accepted until the file 

is emptied. 
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CLOSIN - This routine places the current picture on disc. It then sets 
up new tables for a new day and writes it on disc. This routine 
is accessed by an orderly close procedure. 


WELCUM - This routine updates the disc address while writing data from 
the queue. A picture of the pointers is logged on disc at each 
track change in the transaction file. Checks are made for 
dynamic limit overflows and appropriate warnings issued at the | 
7102 Communications Terminal. This routine also 
the physical limits of the files area. 


SNAPIC - This routine records a picture of the status of the transaction 
file at each track change as well as a normal closing procedure. 


PORTRT - This routine is used to record the System Status Sector on disc 
any time it changes. 


GETSYS - This routine reads the System Status Sector into core during 
initialization or reload. 


GETPIC - This routine will retrieve the current picture from disc and 
set up the tables necessary for operation. It is used for 
normal loads, and initialization. | 


It is also used to retrieve the picture to send to the host 
during a poll for transaction data. 


€. DSOF-DSBAD - These routines revort disc I/0 errors on the workstation. 
The disc condition codes are: 
A. CC = 1 means parity check. 
B. CC = 4 means disc not available or fault. 
C. CC = 3 means bad sector or flag. 


TATTLE - This routine reports a pass through position zero of a partition. 
This normally corresponds to a hardware (ACU) check. Accompanying 
_ an ATT@9 tag will be the 10 characters in position 40 of the 
partition (See ATT@9 discussion. ) 


OLUP - This entry point is made on a host signal for on-line updates. 
Transmitted data is validated, the type of update requested is 
determined, and appropriate routines are called in. 


FLBLDA - This is the entry point for building a new credit file. The 
input buffers are cleared and reset after the entire credit 
file area is cleared to zeros. A message signalling the end of 
the required option is passed to partition zero. The system then 
awaits account numbers which follow on a host command. The on- 
line entry point i: then used to complete the file building 
Operation and the number of account numbers logged on disc is 
reported at the workstation. 
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CIREP 


RNADR 


SEARCH 


ACCADD 


RERE 
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This routine checks the credit status during a credit inquiry 
from the terminals. The status found on disc is tabled with 
the current device. When returned to the partition, a check is 
made to verify that the device which initiated the request is 
actually the device being answered. If the account number was 
not on the file, "NOT HERE” code is returned to the terminal. 

If the number was found, a user specified digit is returned for 
display to the terminal. 


This routine determines the disc address for each account number, 
giving a smooth distribution for the credit file. 


This routine searches the credit file for a specific data pattern. 
This pattern is the account number during an inquiry, change or 


delete and zeros during additions. It replies with a digit or a 
"NOT HERE" code. 


This routine adds a data pattern to the credit file. This pattern 
is the account number during file building and updates. It is 
zeros during deletes. The search routine finds one pattern on the 
file, and this routine writes a second pattern in its place. 


This routine allows for a read in the overflow area during credit 
file operations should it become necessary. 
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DETAILED DiSCUSSION OF SUBTLE PROGRAMMING TECHNIQUES 


This section explains the reasons for, and operations of various addresses, 
instructions, and techniques used in the MDTS Disc Credit Authorization 
Program. 


BASE ADDRESSES: 


A series of base address labels are defined in the low order of COMMON. 
They are BAZ, BAS], BAS3, and BAS4. These labels give a base address for 
instructions. Data in the jow order of COMMON is protected and these 
Yabels do not in any way affect this protected area. They simply provide 
a base address for an instruction. For example, the instruction labeled 
MARK in the STUFF routine does not move data to zero in common as it 
superficially appears. The preceding instructions have modified MARK 


so that the B operand, BAZ, simply provided a common flag for the "Move 
To" address. 


WORK AREA IN 300 (C): 


Twenty positions, 300 to 319 in common, contain work areas and loader set 
constants that must be resident in these locations. 


MODIFIED BRANCHES: 


It 1s necessary at several points to modify branch instructions. The 
Statement labeled FSTONE in the SENDTR entry point is a good example. 

The first signal to send transactions enters at SENDTR. MBUFF's flag 

will be zero (it's empty) so the condition code following SENDTR will be 
1. The first half of the branch at FSTONE is not satisfied and the second 
half is pulled. Initially, the B Modifier is zero, a fall through condi- 


tion code. This allows a series of reset instructions to be executed one 
time only. 


This branch is made unconditional at RSFST for the remainder of the 
transmission and is reset to a fall through at its completion. 


These instructions are also reset during the operation of a SYSUP command 
to insure an initial condition upon starting. 


COMMON ADDRESS MODIFICATION: 


Addresses in COMMON carry a high bit which is arithmetically negative. 
Incrementing a COMMON address, therefore, requires a subtract operation. 
The instruction following MARK in the STUFF routine is an example. The 
field STUFFA contains a TBUFF address. It is incremented to the next 
available position for a transaction by subtracting a positive character 
count. Subtracting (+5) from (-10) gives (-15). 
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CONSTANTS IN INSTRUCTIONS: 


If the first half of a branch instruction is satisfied, the second half 
is never pulled. If the first half is an unconditional branch (code 5 
or 8) it is always satisfied. It is therefore, possible to utilize the 
remaining 5 positions of the instruction for data or work areas. 


ACU CHECK CONDITION: 


On occasion, the System Ten hardware forces the system to execute an 
instruction at position zero of a partition. At position zero of each 
partition, therefore, is an unconditional branch to a routine labeled 
TATTLE. This routine reports an ATT@9 message to the workstation and 
returns to a selected restart address in the partition. The restart 
address is conveniently stored in positions 6-9 of the partition. 


PARTITION POSITION SETTING IN CLOSED: 


Each partition contains a 4 character field which is initialized at the 
address of a routine's-in-use table labeled CLOSED. After loading, the 
actual value of this field is set to its corresponding position in the 
CLOSED table. This is necessary so that a partition claiming the routines 
can release them under ACU check conditions without affecting the status 
of other partitions. 


For example, suppose CLOSED begins at 2000 (C). Upon loading, the program 
in partitions above @ will modify the address by adding the number of the 
partition to the base address of CLOSED. Partition 5, for example, will 
now have an address of 2005(C) while partition 11 will have an address of 
2011(C), and the shared routines will be claimed or released by moving a 

1 or @ to the specified address. 


INSTRUCTION REPLACEMENT: 


Execution of partition zero begins at 0300 (P). Upon loading for the 
first time, position 0300 contains a branch to LOADST. It is later 
replaced, and subsequently operates with a branch on service request. 
Compare ROX to XROX. 


During initialization of a disc, it is necessary to simulate an option 6, 
credit file clear. During a normal load, it is necessary to clear PSFLAG, 
but execution of the normal load routine following a disc initialization 
cannot reset PSFLAG, therefore, a series of instruction replacements 

must occur. 


In the initialization routine, an instruction labeled DIDY is defined. 
When executed, it will move an instruction labeled DITY from SENDI to an 
instruction labeled DUTY in the normal load routine. When initializing 
a disc, DUTY is replaced with DIDY. When the normal load routine is 
executed, DUTY replaces itself with DITY. Subsequent reloads will then 
execute DUTY unless a disc initialization is called for, in which case 
the DIDY to DUTY, DITY to DUTY is repeated. 


§-1-71 9-2 CR-0602 


5-1-7] 


RESIDUAL COUNT: 


A read for data from a terminal is for 245 characters. The actual number 
of characters transmitted is calculated from a residual count in the 
protected area of COMMON. Each partition's residual count address is 
kept at 0025 in that partition. Now examine TAG3 and instructions 
following in the MDTS partition program. The contents of 0025 (P) (the 
residual count address for this partition) is moved to an instruction. 
The residual count (contents of the COMMON address moved in) is sub- 
tracted from 0245 in WORK3. 


The residual count is actually 1 less than the number of characters 
remaining to be sent. Two of the characters sent are communications 
constants, not data. The actual character count sent is finally calculated 
by subtracting three from WORK3. 


9-3 | CR-0602 


MDTS COMMUNICATIONS PROCEDURES 


SECTION 10 


11-8-71 | C R-0602 


{ 
{ 
' 
: 


MDTS System Communications Procedures*, Dial-In SCA 


The procedures of the MDTS System SCA partition software which support 
Binary Synchronous Communications in a dial-in environment are descri- 


bed in the following sections: 


1) 
2) 
3) 
4) 
5) 
6) 
7) 


ID Exchange (Handshake) 
Function Text Analysis 
Communications Standards 
Transaction Transmission 
Account Number Transmission 
Special Features 


Pictorial Examples 


* Communications procedures described in this chapter adhere to conven- 
tions for Binary Synchronous Communications as outlined in document 
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acters of the American National Standard Code for Information Inter- 
Change in Specified Vata Communications Links, of the American National 
ARE Committee X3 on Computers and Information Processing. 
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1) ID Exchange 


A conmunications link between the MDTS System Ten and a "host" computer 
is accomplished by dialing and successfully transmitting six data char- 
acters of identification to tne MNDTS System Ten. The ID characters 
must contain a predetermined character configuration and be followed by | 
an ENQ control character: 
E 
XXXXXXN 


The configuration for "xxxxxx" is determined at MDTS System generation 
time. Any ID transmission which does not match this configuration will 
cause a NAK response from the HDTS System Ten, the ERRI9 message is qen- 
erated (see MLUTS System error message descriptions), and the HOTS System 
Ten will attempt to read a "host" computer IU again. If the ID received 
by the MDTS System Ten is valid, it will acknowledge acceptance by 
replying with its own six character identification followed by an ACK@. 
The MDTS System Ten ID configuration is also specified at System genera- 
tion time. 


When this handshaking procedure has been successfully completed, the 

MDTS System Ten will continue communications with its Function Text 
Analysis phase. If a DLE,EOQT is detected at any time during the hand- 
Shaking, the MDTS System Ten will disconnect the line and force the "host" 
computer to redial to establish a communications link again. 


€ HOST MDTS 
Dial Phone —_—_——Pe = Service Request | 
Send ID, ENQ ee Read ID and validate 


Read ID, ACK®@ «<g—————__———.__ Reply ID, ACK® 
FIGURE 1. Normal ID exchange. 


The MDTS System will reject any communications link for the following 
reasons: | | 


1) Another communications function is active. - 
2) The MDTS System is inactive (see SYSDN and ENDAY commands). 
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2) Function Text Analysis 


The transmission of a Function Text option by the "host" computer is the 
means by which it directs the MDTS System to perform the following func- 


tions: 
Option Description 
O09 Transaction Transmission of the next single 


"logical day" or up to the most recent point- 
of-sale terminal transaction which has been 
logged on the disc when the next "logical 
day" is the “current day". See "*" below. 


Onn Resend Transaction Transmission, where the 

"nn" is the two digit number of a specific 

| MDTS System picture containing transactions 
| for transmission. See "*" below. 


1 Reset Transaction Transmission pointers. 
“This Function Text is commonly used when 
the communications link is interrupted 
during "resend" or transaction transmission. 
If this has happened and the "host" computer 
does not wish to continue on from the point 
of previous interrupt, this Function Text 
option will reset ("erase") all‘ traces of 
that interrupted function (see Transaction 
Transmission procedure). 


2 MDTS System Status request. This causes 
the *STA message to be generated and trans- 
mitted to the "host" computer (see Special 


Features). 

5 Account Number Transmission. 

6 Clear account number file (see Special Fea- 
tures). 


* When Function Text options 999 or @nn are 
used immediately following reestablishment 
of a lost communications link, they will 
cause the MDTS System to resume the inter- 
rupted Function Text option if that Function 
Text option was a 999 or @nn. Only the 
first character of new Function Text option 
is tested in this instance and any ‘nn' char- 
acters will be ignored. (See also Function 
Text option 1.) | 
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Tne Function 


Text option must ba transmitted to the MDTS System Ten in 


the following format: 


S 


T*FUNd.. 


X 


E 

; 

B 

d..= One to three digits which correspond to a valid 
Function Text option. 


The control characters DEL,EOT may also be transmitted by the "host" com- 


puter at tnis 


time to signal an orderly line disconnect (hangup). This 


will cause the fIDTS System Ten to correspondingly relinquish its communi- 


cations Vink, 


Possible responses to receipt of a Function Text option from the "host" 


computer are: 


ACKI - 


NAK - 


WACK - 


EOT - 


FIGURE 
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This response means the NDTS System Ten has accepted the 
valid option and will now follow Procecunes necessary to 
service it. | 


A parity error was detected or too many characters were 
received. The "host" computer should resend the Function 
Text option. 


The MDTS System Ten is busy senvicing the previously received 
Function Text option. The only allowable "host" computer 
reply to this WACK is the standard ENQ or a terminating EOT. 


This response by the MDTS System Ten means that the Func- 
tion Text transmission received does not contain a valid 
configuration of characters. (See also Clear Account File 
description in Special Features section.) An ENQ reply 
from the "host" computer is expected in return and the MDTS 
System Ten will respond to that ENQ with an ACK# and read 
for another Function Text option from the "host" computer. 


HOST MDTS 


Send Function Text ——f Read Function Text 
Read Reply <@——— Reply ACK] 


2. Normal Function Text Transmission. 
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3) Communications Standards 


The MDTS System SCA partition software adheres to standard binary 
Synchronous communications procedures for the following situations: 


Line Reversal (Turnaround) 


This is the procedure by which one computer (Computer 'A' in 
Figure 2) ends its data transmissions and prepares to receive 
data from the other computer (Computer 'B' in Figure 3) with- 
out disconnecting the communications link. This is accomplished 
by ‘Computer A’ transmitting an EOT control character after 
sending its data block(s). The proper reply from ‘Computer B' 
is an ENG control character, which ‘Computer A' acknowledges 
with an ACK. 


Computer A — Computer B 
Send EQOT ——_—_————-Be Read Data 
Read Reply <«g——___—__ Reply ENQ 


Reply ACK® j|§.—————t Read Reply 
FIGURE 3. Normal Line Reversal. 


As described above, the MDTS System Ten or the "host" computer 
may assume the role of ‘Computer A’. This is determined by — 

_ the operations which are required to service the Function Text 
option currently in effect in the MDTS System Ten computer. 


All errors detected by the MDTS System during this sequence of. 
operations are handled by the MOTS System SCA software Error 
Recovery procedures, as described in this section. 


ACKn Sequences 


The ACK@ and ACK] sequences are used alternately in response to 
“host" computer transmissions requiring them. The MDTS System 
Ten will set the ACKn sequence to start at ACK upon establishing 
a communications link (see ID Exchange section) and Line Reversal. 


Communications Fault (Timeout) 


The MDTS System SCA partition software will retry all "read" 
type communications I/0 instructions when a "fault" condition 
(no SYN characters received) is detected upon the first issuance 
of that instruction. (Refer to Singer System Ten publication 
524-700721-M33, Synchronous Communications Adapter Reference 
Manual). -The instruction will be re-executed up to 7 times 
before being reported by the ATTO6 console message and discon- 
necting the line. 
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Error Recovery 


The MDTS System SCA software will respond with a NAK to all 
transmissions of data which contain parity errors or are too 
large to be received in the circumstance. The MDTS System 

_ Ten will expect a retransmission of the correct data to be 
forthcoming. 


The MDTS System SCA software will respond with an ENQ to all 
transmissions of control character responses from the "host" 
computer which contain parity errors or are invalid for the 
response expected (see Control Standards in this section). 


Control Standards 


The MDTS System SCA software adheres to the Standard usages 
of the following control characters: 


WACK - This control character is used by the computer 
receiving data when it must temporarily stop re- 
ceiving data transmissions. It is sent in place 
of an acknowledgment (ACKn) of the last complete 
data block received. The WACK implies a "wait 
before acknowledgment". The proper reply to a 
WACK is an ENQ control character however if the 
computer which is transmitting data does nov wisn 
to "wait", the EOT control character should be 
its reply. The EOT used at this time should 
cause the normal Function Text cption termination 
Sequence to be prematurely invoked (see Line 
Reversal in this section). 


of signifying the end of a sequence of data trans- 
missions by a computer and signaling a change in 
its mode to receive data transmissions (see Line. 
Reversal in this section). The MDTS System will 
also use the EOT control character for rejecting 
an invalid Function Text option (see Function. 
Text Analysis section), and to force Line Reversal 
in an attempt to maintain its "slave" status with 
the "host" computer when a "receive data" sequence 
is ending (see Account Number Transmission section 
for example). 


ENQ - This control character is used primarily to “inquire” 
to another computer, what control character it had 
previously transmitted (see Error Recovery in this 
section). It is also used as a standard reply to 
the EOT and WACK control characters (see Line 


EOT - This control character has the primary function 
Reversal and WACK descriptions in this section). 
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DLE, EOT - This transmission 1s accepted by the MDTS System 
SCA software only when it is received in place 
of a Function Text option or during ID Exchange. 
If detected at any other time during a comnunica- 
tions link, the MDTS System Ten will fault (time- 
out) on the next logical communications I/0 
instruction. 
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4) Transaction Transmission 


Transmission of stored point-of-sale terminal transactions by the 
MDTS System SCA software is signified by directing the MDTS System 
Ten with the Function Text option number 92% or finn (see Function 
Text Analysis). Receipt of this Function Text option by the MDTS 
System Ten is expected to be followed by a Line Reversal from the 
“host" computer and allow the MDTS system Ten to assume a send 
data, read reply sequence. 


Transaction data is transmitted in variable length transmissions 

of 18 to 250 data characters, framed with the control characters 
STX and ETB. More than one transaction may be contained in a 

Single transmission, however, single transactions will not be split 

between two transmissions. The format is: 


S E 
Tdddddddddddddddddd(up to 250 char. )T 
X B 


The expected response to this transmission is the proper ACKn 
sequence from the "host" computer. If a NAK is received the MDTS 
System Ten will re-transmit the transaction block. The WACK or 
any invalid response received will cause the MDTS System Ten to 
send an ENQ and read for an ACKn reply again. 


HOST MDTS 

Read data <«<g————— Send data 
Send ACKn -—————— Be Read reply 
Read data <a————— 9 Send data 
Send ACKn Be Read reply 


FIGURE 4. Normal Transaction Transmission. 


The MDTS System Ten will terminate Transaction Transmission when 
the stored transaction data limits for the given Function Text 
option are reached (see Function Text Analysis section). This. 
condition causes the MDTS System to relinquish its control of 
the communications line via Line Reversal (see Communications 
Standards section). 


If the communications link is lost due to a fault detection (see 
Communications Standards), the MDTS System will retain all control 
information that enables Transaction Transmission to continue from 
its point of premature interrupt, i.e., the last transmission not 
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acknowledged, when the next Function Text option 999 or Pnn is 
received. To bypass this feature it will be necessary for the 
"host" computer to use Function Text option 1] prior to using 
Function Text option QPP or nn (see Function Text Analysis). 


TTD hiessage. 


During transmission of transactions to the "host" computer, 
it may become necessary to delay the transmission of a 
block of data because the MDTS System Ten has encountered 
one of the following conditions. 


a) A higher priority task is being serviced (i.e., 
reading point-of-sale terminals, etc.) 


i PEATE Ea AAT LGC | CARS PN ep ARDEP SEE CE IIE LETT EOL 


b) The System is preparing to service the MDTS System 
SCA Function Text option. 


c) Disc errors are being encountered, and the MDTS 
| System is attempting recovery. 


d) A required MDTS System Ten dice drive is disabled 
or inoperable. 


The above conditions do not prevent SCA communications , how- 
ever they do degrade the NDTS System's ability to service a 
Transaction Transmission Function Text option. While those 
conditions exist the MDTS System SCA will transmit a 
"temporary text delay" message (TTD) which has the following 
format: 


S OE 
TTTTT...(18 letter T's)T 
X B 


This message should be acknowledged and discarded by the “host" 

computer. However it is recommended that the “host" computer 

maintain a count of continuous TTD messages received and take 

a type of action when the count reaches an unreasonable 
imit. 


*END Message. 


When the end of a transaction picture (see Disc Organization 
section) in the stored point-of-sale terminal transaction file 
is encountered, an ATTOI console message displayed and an *END 
message is generated and placed in the Transaction Transmis- 
Sion data block. A transmission block containing this message 
may reside in the block alone or may be preceded by transac- 
tion data. It will never be followed by transaction data in 
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the same transmission block. The message format is: 


S E 
T(preceding data, if any)*ENDppttttttmncabbbbbbeeeeeeT 
X B 
*END = Four characters to indicate the type of mes- 
Sage. 
pp = Two digits for this picture number. These 


two digits must be passed back to the MDTS 
program for a resend. A resend will be for 
a picture only. A resend can occur only by 
the passing of these two digits to the MDTS 
program. This picture number must be an 
even number, ranging from 02 to 98 inclusive. 


tttttt = Six digits representing the number of trans- 
actions retrieved from the disc in this 
picture. This would correspond to the 
number of "P's" transmitted since each 

transaction begins with a "P". 

m = Aone digit flag with the following meaning: 

1 = There are more pictures with data for 
this day on the disc. (This flag must 
be examined in connection with Field 5 | 
to determine whether the data is in the 
current or a past day). 

NOTE: See example 3 for exception. 

0 = There are no more pictures in this day 
with data. The next MDTS write will be 
an EOT character. | | 

n = Aone digit flag with the following meaning: 


1 = Next day to be sent will be the current 
day. The next MDTS write will be the 
EOT Line Reversal procedure. The host 
may pick up this data in the current day 
by sending a normal poll function follow- 
ing the line reversal procedure. It may 
leave the data for a subsequent poll by 
changing functions or by signaling a dis-_ 
connect. : 


Q = The next day to be sent is not the 
beginning of the current day. 
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c = A one digit flag with the following meaning: 


1 = This picture is in the current day. 
0 = This picture is not in the current day. 
a = A one digit flag indicating terminal activity 


with the following meaning: 


1 = All terminals are currently closed. 


0 = At least one terminal is not closed. 
bbbbbb = Six digit disc address of beginning trans- 

action file sector for the picture in Field 2. 
eeeeee = Six digit disc address of ending transaction 


file sector for the picture in Field 2. 


*END EXAMPLES 


oo 4, 5, and 6 may be used by the host to determine its next logical 
step. 


a eal examples illustrate some of the combinations of Fields 4, 
» and 6 


Example |: ‘No data has been transmitted for three days. Today is Thurs- 
day; the store is open and running into one picture. The 
other days are configured as follows: : 


Day Picture Code 4 5 6 Next MDTS Write 


Monday 04 0 0 0  EOT character & 
line reversal 
sequence. 
Tuesday 06 1 0 O Next data block. 
08 1 0 QO Next data block. 
10 0 0 QO EOT character & line. 
reversal sequence 
Wednesday 12 1 O O “Next data block. 
- 14 1 1 0 EOT character & line 


reversal sequence. 


Thursday 16 
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Example 2: 


Example 3: 
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This example illustrates three consecutive polls (function 
code 000) to pick up Monday's, Tuesday's, and Wednesday's 
data. If a fourth poll were sent by the 360 after receiving 
the third EOT character from the MDTS, the data in picture 
16 will be transmitted and Thursday will be reconfigured as 
follows: 


_ Day Picture Code 4 5 6 Next MDTS Write 
Thursday 16 0 0 1 EOT character 
| 18 


If data came into the system during the transmission of picture - 
16 of Thursday's data, the flags will be 101, indicating 
more data to come in this day. -Picture 18 will be closed, 
picture 20 opened, and the data in 18 transmitted. This pro- 
cess will occur only this once, however. If data came into 
picture 20 during the transmission of 18, the *END message 
will reflect this with 101, but an EOT character and line 
reversal sequence will be transmitted next. 
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5) Account Number Transmission 


Transmission of account numbers to the MDTS System Ten from the "host" 
computer is signified by directing the MDTS System Ten with the Function 
Text option number 5 (see Function Text Analysis). This causes the MDTS 
System Ten SCA partition to commence reading and acknowledging success- 
ful transmissions of up to 250 characters of data framed with the control 
characters STX and ETB (or ETX). The acceptable format of each account 
number transmission block is: 


S E E 
Tannnn...na(nnnnn...nannnnn...naLup to 250 char])T (or T) 
X B 


X 


nnnonn...n = Each account number, plus display code. This 
must be equal in length to the maximum account 
number size specified during MDTS System Initial- 
1Zation. 


a = Action code, used to determine what is to be done 
with the associated account number: 


2 = Add the number. 

3 2 pareve the number. 

4 = Change the display code specification. 
5 = Add the number. 


Normal response to the "host" computer for an accepted block of trans- 
mitted data is the proper ACKn sequence. 


The NAK response by the MDTS System Ten signifies that the last trans- 
mission block received was in error for one of the following reasons: 


1) A parity error was detected. 


2) The combined count of control and data characters received 
exceeds 252. 


When the NAK response is transmitted, the MDTS System Ten will accept a 
resend of the transmission block in error or an EOT to terminate the 
Function Text option. 


In the event that the MDTS System Ten becomes temporarily preoccupied with 
other services (i.e., point-of-sale terminal servicing, etc.) a WACK 
response is transmitted to the "host" computer which signifies that the 
last block of data is accepted but the proper ACK response will be delayed 
until the MDTS System Ten is again free to accept the next transmission 
block. The only replies from the “host" computer that the MDTS System 

Ten will accept in response to a WACK is the standard ENQ reply or the 

EOT reply which will terminate the Function Text option. 
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MDTS HOST 


? Read Data ««y—-———___——_ Send Data 


: Send ACKn ————-—tm Read Reply 
Read Data Se Ciena nee Send Data 
Send ACKn -———————tm Read Reply 


FIGURE 5. Normal Account Number Transmission. 


Termination of Account Number Transmission is accomplished when the MDTS 
System receives an EOT control character instead of data. This will cause 
the MDTS System to reply ENQ and then force itself into a "slave" status 
to the "host" computer by responding EOT to the ACKn from the "host". 


| 

| 

H 

i 

MDTS HOST 

| . 

Read Data -<«j——————._ Send Data 
Send ACKn -———————f Read Reply 
Read Data ««gj——————_ Send EOT 
Send ENQ. —————Bme Read Reply 
Read Reply «@——————_ Send ACKQ 
Send EQT #$——————®® Read Data 
Read Reply «<@—————-. Send ENQ 
Send ACK® ————-B Read Reply 


FIGURE 6. "Slave" Status Assumed By MDTS System. 


It will be noted that the procedure shown in Figure 6 is two consecutive 
Line Reversal sequences where the "host" is ‘Computer A' and then the MDTS 
System is ‘Computer A' (see Line Reversal in Communications Standards 


section). Following this sequence the MDTS System will resume Function 
Text Analysis. 
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6) Special Features 


The MDTS System SCA software package includes the following features 
which supports conversational "host" computer control of MDTS System 
functions: 


MDTS System Status Request 


This feature allows the "host" computer to interrogate the MDTS 
System Ten operational status. This is accomplished by the Function 
Text option 2 which, when received by the "DTS System Ten, requires 
a Line Reversal by the "host" computer to allow the HMDTS System Ten 
to transmit a *STA message. When that message is successfully 
acknowledged by the "host" computer, the MDTS Svstem Ten will com- 
mence Line Reversal and then resume Function Text Analysis. 


- The *STA message is in the following format: 


S E 
T*STAcaptnnnnnnxxyybbbbbbeeeeeeT 
X B 


*STA Four characters identifying the message. 


Cc One digit indicating the status of days in the 


MDTS System. Its values are: 
1 
0 


" 


The next day to transmit is the current day. 


The next day to transmit is not the current 
day. : 


NOTE: Two interesting situations may not be readily 
apparent. The end of a day is determined 
by an operator command. First, should the 
operator have failed to enter this command, 
this flag will be a 1. The data is still 
available by polling in a normal way. Second, 
had the operator erroneously generated a 
series of days without data, this flag will 
be 0 even though the day which is now re- 
ceiving data may not have ended. 


a = A one digit flag indicating terminal activity with 
the following meaning: 


1 
0 


All terminals are currently closed. 


At least one terminal is not closed. 
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p = Results of the previous communications link. The 
values are: 


Space = Terminated properly. 


Digit = Value indicating the last communication. 
option that terminated incorrectly. This 


corresponds to the function code digit 
such as O for poll, etc. 


t = Previous poll type. 
0 = The previous poll was properly terminated. 


R = The last poll? was a resend abnormally termin- 
ated. 


a | 
i 


The last poll was a data poll abnormally ter- 
minated. 


NOTE: The system is specifically designed to 
pick up the prematurely ended poll. If the 
user does not wish to pick up at the dropped 
point, he must signal a system reset before 
specifying a different function. 


nnnnnn = Six digits indicating the number of account num- 
bers currently on the credit file. 


xxyy = Four digits used to indicate the number of logical 
days remaining to be sent to the hcst computer. 
The format is "xxyy" where "xx" indicates next 
logical day to be sent and “yy" indicates the cur- 
rent logical day. 


bbbbbb = Six digit address of the beginning sector of stored 
transaction data in the MDTS System. 


eeeeee = Six digit disc address of the ending sector (ex- 
clusive) of stored transaction data in the MDTS 
System. | 


Reset Transaction Transmission Pointers 


11-8-71 


This feature permits the "host" computer to reset to a "clear" state, 
the Transaction Transmission buffers and pointers after loss of 
communications link for a previous Transaction Transmission Function 
Text option. The transmission pointers for the stored transaction 
file in the MDTS System are reset for the beginning of the MDTS System 
ees which was partially transmitted prior to the communications 
oss. | 
This feature is invoked by Function Text option 1. The MDTS System 
Ten will expect an EOT transmission after it acknowledges this 
Function Text option. Upon receipt of the EOQT, the MDTS System Ten 
will commence Line Reversal and then resume Function Text Analysis. 
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Clear Account File 
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This feature allows the "host" computer to "prepare" the MDTS System 
Storage area that was assigned to the Negative Credit File durina 
MDTS System Initialization. This preparation consists of removal 

of all account numbers from the file. 


This feature is invoked by Function Text option 6. The MDTS System 
Ten will expect an EOT transmission after it acknowledges this Func- 
tion Text option. Upon receipt of the EOT, the MDTS System Ten will 
commence Line Reversal and then resume Function Text Analysis. 


NOTE: During execution of the Function Text option 6, no other 
Function Text options will be accepted (see WACK description 
in Function Text Analysis section). 
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7) Pictoral Examples of MDTS System Communications. 


The following examples attempt to show the normal communications I/0 
sequences between a MDTS System Ten and another computer designated 
as "HOST". 


. Example 1. Transaction Transmission. 


Function | 
(Sec. #) MDTS HOST 
Service Request <a Dial Phone 
I.D. ei lal ———__— Read ID, ENQ <}———— Send ID, ENQ 
Reply ID, ACK —--——f> Read ID, ACK 
Read Function Text--:t-— Send Function Text 
Function Text Analysis 
- (2) Reply ACK] -—--————-> Read Reply 
Read Data -««<2i——————-. Send _ EOT 
Line Reversal — Reply ENQ. ———————t> Read Reply 
3 
Read Reply «<i———_—_-——— Reply ACK9 
Send Data ————-——i>» Read Data 
Read Reply «<<———-——— Send ACK] 
Send Data —————->> Read Data 
Transaction Transmission 7 
(4) ‘Read Reply <3j——————— Send ACKO 
Send Data ———————f> Read Data 


Read Reply <<}——————- Send ACK] 


Send EOT ——_———> Read Data 

Line ee , Read Reply <<}+————— Reply ENQ 
3 | 

| Send ACKQ —————t> Read Reply 


End — ————_{ Disconnect a Send DLE EOT 


11-8-71 : | | 10-18 C R-0602 


Example 2. MDTS System Status Request Foi lowed By Account Number 
Transmission. 


Function 


(Sec. #) MDTS HOST 

Service Request «y—— Dial Phone | 
Read ID, ENQ <@————— Send ID, ENQ 
Reply ID, ACK® ————tz Read ID, ACKP 


ID Exchange 
(1) 


in| 


Read Function Text <3— Send Function Text 
Reply ACK] -————t Read Reply 

Read Data <«<@§—————— Send EOT 

Reply ENQ ——————-B Read Reply 


Function Text Analysis 
2 


LL 


Line Reversal 
3 


| 


Read Reply «ej——————— Reply ACK® 
Send Data —————$ Read Data 
Read Reply <«j————._ Reply ACK] 
Send EOT ——————f> Read Data 
Read Reply «@j———--————. Reply ENQ 
Reply ACK? ——————f™ Read Reply 
Read Function Text <— Send Function Text 
Reply ACK] ———————B Read Reply 
Read Data <«#——-———— Send Data | 
Reply ACK®Q ——————$> Read Reply 
Read Data ~<@§—————— Send Data 
Reply ACK] ———————fe Read Reply 
Read Data <@-————— Send E0T 
Reply ENQ Peon ea Read Reply 
Read Reply <@——————. Reply ACKP 


_ MDTS System Status 
(6) 


| 


Line Reversal 
(3) 


L 


iaade Text Analysis 
9 


{ 
aaa 


Account Number Transmission 
5 


Line Reversal 
(3) 


a 
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Example 2 (continued). 


Function | 
(Sec. #) MDTS | HOST 
Send EOT —————Be Read Data 
Line — Read Reply «<3j————————_ Reply ENQ 
3 


Reply ACK® ——————Be Read Reply 


End eo —— Disconnect -<@-——-——-——— _ Send DLE EOT 
2 


11-8-71 - | - 10-20 CR-0602 


CONSOLE CREDIT FILE UPDATE 


Section 11 
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CONSOLE CREDIT FILE UPDATE. 


General Description 


The facilities of Console Credit File Updating, as described in this 


section is considered an optional feature of the MDTS "Collective 
— Store and Forward. System with Credit Authorization". The routine 


uses aS its load vehicle the RBSA program NFR2QQ. 


Capabilities have been provided for the adding of credit numbers, 
deleting numbers, and/or changing them. The routines may also be 
used to alter the display code of any number. 


The security of the credit file rests solely with the operator and 


his ability to use this option. Audit trails and proofs other than 
the console typewriter sheet have not been provided. 


General Operating Features 


_. The Credit File Update routine may be accessed from either the Work- 


Station’ or the Console Monitor’. It should be kept in mind, that 

all updating of the file is handled through normal MDTS System routines. 

All message reporting (errors, warnings, etc.) are handled by the | 
Console Monitor regardless of the device used. The routine is entered . 
by securing a Service Request, keying the update's mnemonic to call 

the routine into operation, and entering a phase identifier to denote 

the operation intended. 


Phases applicable to the routine are; ADD (to add numbers to the. file), 


DELETE (to remove existing numbers from the file), or CHANGE (to alter the 
display coce of an existing number). Upon the completion of entering 
any phase's account numbers, tne routine may be terininated by signaling for the 


end-of-job, or another phase may be used by signaling for an end-of-phase. 


Normal MDTS message processing will occur on-line with the Credit File 


Update and will be reported by the Console Monitor. While this routine 
is in operation, all Service Requests from the Workstation or Console 
Monitor will be ignored. | 


oo 


*]. The Workstation is the Model 70 Workstation assigned Device Address 7. 
*2. The Console Monitor is the Model 79 Workstation or Model 7192 assigned 
' Device Address @. 
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Due to the address modifications required to allow interfacing with exist- 
ing MUTS and RBSA coding techniques, it is imperative that any update be 
terminated only by signalling an end-of-job. If the routine is inter- 
rupted by a LOAD condition on the Console Monitor, a restart branch code 
of "PPPPP50390" must be initiated and the end-of-job code entered properly. 
_ If this procedure is not adhered to, the system will remain in the Console 
Credit File Update routine indefinitely. 


Operator Instructions 


1. Secure a "Service Request” on the Workstation or Console Monitor. The 
device used in obtaining the Service Request will be used in entering 


the account numbers, and in communicating with the Credit File Update 
routine. 


2. When the Service Request is honored, enter the routine nmemonic, "NAFUD", 
the system will respond in one of the following possible manners. 


a. If the system is not in a "SYSUP" state, a message will be printed 
on the Console Monitor "SYSTEM NOT IN SYSUP CONDITION" to indicate 
this condition, and normal MDTS cycling will continue. (See SYSUP, 
SYSDN and ENDAY commands in Section 5, "Workstation Commands"). 


b. If the system is currently involved in communications routines, a 
message will be printed on the Console Monitor, "COMMUNICATIONS 
IN PROGRESS", to indicate this condition and normal MDTS cycling 
will continue. Console Credit File Updating may not occur simul- 


taneously with communications procedures due to conflicts in buffer 
uses. 


c. If the system is in a "SYSUP" state and communications are not in 
progress, it is therefore accessable and will respond with a mes- 
sage on the Console Monitor, "START CREDIT FILE UPDATE INTERFACE - 
ENTER PHASE", to indicate that the system will accept Credit File 
Updating. | 


3. Wnen the system is operable and has responded with “START CREDIT FILE 
UPDATE INTERFACE - ENTER PHASE", the operator must respond yith a 
phase name as described below followed by a “unit seperator~". 


*3 The “Unit Seperator" is used in completing all responses to messages 
generated by this routine and must follow each response or account 
number entered. The unit seperator is generated on the Workstation 
by depressing the ENTER Key, where as on the Model 7192 it requires 
the depressing of the Control and / Keys simultaneously. 
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a. ADD = to add account nuinbers to the Credit File. 

b. DELETE = to remove existing account numbers from the Credit File. 
c. CHANGE = to alter the display code of an existing account number. 
d: E0J = to halt processing and return to normal MDTS processing. 


“An error in entering the Pnase name, an account number or an end request, 
is bypassed by pressing the ERROR Keys4. The message "INVALID ENTRY. RE- 
CNTER" is printed on the Console Monitor and the system waits for the pro- 
per data to be entered. 


4. Having entered one uf the phase names described in 3 above, the operator 
may tnen enter as many 13 digit account numbers as are applicable to 
the phase. The check digit is included in the account number and must 
be entered. Ail account numbers must be followed by the display code. 
The total entry per account must be 14 characters. Account numbers with 
less than 13 digits must be preceeded with as many zeros as are required 
to make a 13 digit number. All digit entries must be followed by a 
"Unit Separator" (See footnote 3, pg. 11-2). ; 


5. Should the system be unable to dispose of an account number entered as 
a "DELETE" or "CHANGE", the number is typed on the console monitor. 
(see WRN@3 and WRNQ4 pg. 11-4). In as much as the "Check Digit" is re- 
quired for number entry only, the “Display Code" replaces the Check 


Digit on the Credit rite. Any account number accompanying the WRN3 
and WRNQ4 will reflect this replacement of the Check Digit by the Dis- 
play Code. 


6. At the conclusion of any of the phases described above, the operator 
may then enter one of the following: 


a. EOP = indicates the end of the phase. The message "END OF PHASE" 
1s printed on the Console Monitor and the System waits for 
the next pnase name to be entered as discussed in 3 above. 


b. EQJ = indicates the end of the Console Credit File Update activity 
and returns the system to normal MDTS cycling. The message 
"END CREDIT FILE UPDATE FROM CONSOLE" is printed on the Con- 
sole Monitor. 


*4 Errors in entering data: may be bypassed on the Workstation by Pazee ng 
the ERROR Key, where as on the Model 7102 the combination of 
Control-A, Control / is required. 
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Possible messages printed on the Console Monitor in conjunction with the Console Credit File Update. 


fe Ee ee RR, Hs see ee eee Ee OS SP ED ES ee A ECE oY SERS Cm RIDA SEIN Hie AR 0 ~~ a ne es Sar earner ene eOY en om ve a ee et een cae 


Caused By 


RE eerie meee Cente © OR OME SE sie cto —epiertlinonne seeepit- eae me oo ee eee a oe 


Required Action | 


Entering EOJ to exit from the routine. None. 


pare oi ee ~ 
eee AR Ae EE = a a A RN NE YM cin = NOL eS AORN § SNE SC oN enn nO EE ee ea =: cee ae meee. 


| 

The system is involved in communications None - Communications must be | | 
| 

| 

¢ 

} 


routines. Credit File Updating cannot be completed. 
| performed due to a conflict in buffer area. 
|p meteeenenenemnact tae nt ha Lacey csc cco ncn edt a es a as aces ta ere ae : dati a ns mas tas Seti rs estate a Vena SaaS td 
| END CREDIT FILE UPDATE FROM |! Aj Entering EOJ to exit from the routine. © None. | | 
. CONSOLE | | | 
END OF PHASE Aj} Entering EOP to change from one phase to Enter a phase name to continue | 
| another File updating. - 
ERRG2 Bj} Account number length incorrect. Re-enter the proper account ' 
number as described in Number 4 
of the "Operator Instructions". 
| INVALID ENTRY. RE-ENTER A| Entering an incorrect Phase name, account Enter proper name or number to 
| number, or end request and pressing the continue. ! 
ERROR key. | 
START CREDIT FILE INTERFACE - | A Service Request honoring of Routine Enter "ADD", "DELETE" or "CHANGE", | 
ENTER PHASE Nmenonic "NAFUD". to process, or "EQJ" to abort the 
- | routine. | 
] : en : eae Se ee ee a ee a eS ee ey 
| SYSTEM NOT IN SYSUP CONDITION The MDTS system is not operational at the Complete operations involved in and ' 
time the service request is honored. (See foilow directions required in making | 
SYSUP, SYSDN and ENDAY commands in Section 5)Jj the system operational. 
WRNQ3 aaaaaaaaaaaad Attempt to Delete a non-existant account Enter proper account number, includ- 
| aaaaaaaaaaaa = the first 12 digits of the ing check digit and display code. ; 
7 number entered 
7 d = the Display Code which nas | 
replaced the Check Digit. | 
WRNQ4 aaaaaaaaaaaad |B | Attempt to alter the Display Code of a Enter proper account number, inclua- | 
non-existant account. . ing check digit and display code. 
aadaaaaaaaaa = the first 12 digits of the | | | 
number entered. | 
d = the Display Code which has 
replaced the Check Digit. | 
= fit ET AE REED — 
| WRN@D5 Credit File area Full for numbers which None. Account number is printed but 
| would randomize to that area. Does not not written to the credit file. 
imply all Credit File Area is full. 
A = Device at which the Service Request was secured to initiate the routine. 
B = Console Monitor, Device 9 only. 
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0199 
0200 
0201 
02062 
N2C3 
0704 
0205 
0206 


02907— 


0708 
0299 
0210 
OP 11 
0212 
0P13 
9214 
0715 
9P16 
0217 
0218 
0219 
0220 
0221 
0222 
0223 
0224 
0225 


{ 
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I4ASE 
* EN END MESSAGE IS SENT AITH THE LAST OF THE DATA 
* 
aSS%0 OM QAC35 *END MESSAGE SUFFER AREA 
COM C7'1891028! *ENO LENGTH & IeDe CONSTANT 
O04 C&'sEND! 
HOLPIC O'! C2'00! 
TRANCT N# C4&'N00000! 
FLAGL OM C3'000! 
END DM crit 
TRANAND DM €C12'9000000900000! HOLD THE PICTURES CATA ANMRESSFS 
‘ ; 
CLOFLG O™ Cror MUST PRECEDE CLOSED TABLE 


CLOSED 0M 
¥ 
* COUNTERS 
% 


EOITe ON 
NUMBQ 0M 
ON 
INPPA 0m 
OM 
OTPPY 0m 
¥ 
x 
x 
* 
¥% 
* 
% 
¥ 
*% 
* 
* 
SEND C 
AC 
Cc 
BC 
C 
BC 
C 
Bc 
Cc 
BC 
OI1Ty MC 
NPOSK MC 
CHACHA MC 
RETRY MC 
RESUME BC 
¥ 
»% 
% 
¥ 
+4 
* 
SENDQ MC 
MC 


2oci' SHARED ROUTINE PROTECT TABLE 


C4 anus 

C2a'nor NUMBER OF ITEMS IN QUEUE 
Cate Ine! 

AS'QHESIN' INPUT POINTER 

C4'*OPT! 


A&*GBEGIN! OUTPUT POINTER 

TRE SENDL ENTRY POINT [S THE NASTER CONTROL OF THE SYSTEMe 
ENTRY IS MADE dERE FROM EACH MOTS PARTITION THAT DOFS NOT 
HAVE A TERMINAL SERVICE REQUESTe LINE CONCENTRATOR 
FUNCTIONS ARE THEN SELECTED OW A PRIORITY BASIS GIVING 
QUEUE TO DISC FIRST PRIORITY» THEN» IN ORDER 

ON@LINE CREDIT FILE CHANGES, TRANSACTION FILE 
TRANSMISSION» AND REBUILDING THE CREDIT FILE® IF NO 
FUNCTION IS PENDINGs THE SYSTEM RETURNS TO & CHECK OF & 
SERVICE REQUEST AND SWITCHES PARTITIONS. 


BRuUMRBo, ZEROS DATA IN QUEUE? 


SENDO(3) LOG IT GN GISC . 
SENTCKs ONE OID PREV SCA #FUN O COMPLETE OK 9? 
SENTOK(2) IF IT DID O09 UPNOWN AID PORTRT NOW 
PSFLAGs FIVE CHECK FOR UPDATE : 

NLUP(2) BRANCY TO UPDATE IF YES 

PSFILAGs ZEROS Send TRAXSACTIONS? 

St NDOCKI2) YtSs GO TO SENDCK 

PSFLAG?SIX CHECK FOR BUILD 

PLAELDA(2) BRANCH TO BUILO IF YES 

SPACE(3) e2PSFLAG RESET IN CASE INVALIC 


ADUUST TO PARTITION FOR FLAG 
RELEASE SHARFOD ROUTINES 
PLACE CORPECT RETUR'’ ADDRESS 
GQ SACK WHERE YOu CAéve FROM 


CHEATs CHACHA 46 
ZFRNS(1),CLOSEO 
06P( 4) sRESUME+6 
0(0)2REX(5) 


TRE SENDOQ ENTRY POINT WRITES DATA IN BLOCKS OF ONF, 

TWO OR THREE TON FHE NISCe ILLEGAL DATA IS IGNORED AND 

A MESSAGE PASSED TO THE WORKSTATIONe QUEUE PCINTFEFRS ARE 
UPDATED AND RESET TO THE BEGINNING IF THE QUEUE IS FMPTYe 


OUTPUT POINTER IN TNMEX PEGISTER 
CLEAR DISC READ CQUATER 


OTPPT,REGI 
ZEROS(1)eCT1 


om, 


o™ 


hy 
J 


Locn 


1930¢ 
199N¢ 
20006 
204104 
e2nenc 
PORAC 
20466 
eognc 
204aNC 
2055C 


—- 20606 


2070C 
20R5¢ 
ensac, 
e1ane 
2410C 
21e0c 
e13ace 
2140C 
2150F 
214602 
2170¢ 
21 R0C 
21909C 
220628 
2210C 
e2eProns 
2230CE 
22°5C 
22esgc 


2230C 
224CC 
2250C 


2260C 


PETAL 
2eERGC 
P2908 
230CC 
23206 
232CC 
P3A38CC 
C340 
23590C 
2360C 
2370C 
C3857 


PMT EN ASCENG ER 


IhSTRSKATA 


PPONVS 4 TSO 
RO IWPRPAPHAP 
LTHPuP1t7Re, 
LTS9NP17 ay 
VOPS4REQ5p 
PPISHARON2APw 
VSAIANPGFAIS 
PRRPAGANNA 


ERR 

PPPASYTSOW 
SPPPPTPCOP 
V3¥TQSABDP 
V3XTNSERAAGA 
V3XTRERAASP 
TTOONMANDKBAR 
POWSY4O30R 
I2NUWPALADN 
PO APRWIT9IY 
Of RVI OR QV 
SPIUYPQAQOANG 
PO vAUATS9aY 
SLYRPOCHANN 
P14aS9YAPIT7R!! 
PO 32R417985 
POWPRAI79Y 
Ji YReEaaNAN 


Oon0 


la 
vw 


PTPAW1149V 
PeRIIPR1I9QIAp 
PSA 149Y 
RPRVYPOCOAD 
PLsQYA4GQ7L 
P&AQWWI ABN 
PRIT7VISSOLi 
RZJWVYECPTAH 
POTSYA4&37x 
UP UIKXEQVAGRP 
PTRIKIVWAAY 
PPIATANQITP 
NPTVE3IP&BP 
APYVSRAT&SY 
SPTUPNONANG 
QOASPROARAPR 


TY? 


OP 


14 
11 
07 
4 
11 
N82 
O98 
11 


14 
11 
11 
11 
11 
4 
14 
11 
AR 
14 
11 
14 
11 
O08 
8 
08 
11 


CRO6B02 @= MOTS 


A/R 


NnoSC 
2100C 
&505C 
4&5 05C 
0N36 

PO55C 
N9000C 
P1eClC 
2055C 
0001 

9003C 
Pn000C 
3R41C 
3R4iC 
BR4it 
4&8 05C 
1799C 
2170C 
03°°C 
1786C 
2190C 
1785C 
1920C 
1499C 
OR 22C 
9322C 
19?P0C 
22725C 
noo! 

Nn01 


’027C 
2?50C 
31C5C 
27?90C 
1499C 


&A697C. 


1179C 
32760C 
14990 
PRACT. 
FRIEC 
OR64C 
P460C. 
06&6PC 
2450C¢ 
C4a&50C 
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WI- DRY VO 


~wWYd-DdI7I~ TS VIIIOVIAVA 


NMoOoowrDwWoODeDeHRHRWO 
DPOD,DOOOND9000D000DNB090~ 
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om v0O0 02° ~ 


[TPT O D700 390 0 939 03009002 


oo) 
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4505C 
2060C 
17R&5C 
1799C 
§950C 
O327C 
0333C 
0000 


0005 

4507C 
2090C 
3690C 
3690C¢ 
3690C 
06462C 
0392C 
on000 

1799C 
46436C 
0000 

1439C 
nnNoON 

17835C 
1791 
1799C 
oc 00 


NA04 
on01 


1499C 
19P0C 
1499C 
oc00 

4377C 
321405C 
&8RIASC 
P7P0 
&A7RC 
P5800 
3106C 
O270C 
246C0C 
1499C 
0C:00 

O08 60C 
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xXxvderewWDVvrwvdwrwrwornn- 


SYSTEM WITH CHRONOA 


sf 


oo0oo7lno7 ]30 3 


oooo9n0onoc°oe I dT 90 00 co 0 


oooo dp g0 09009 090 0 099000 


LINE 


0226 


0227 
0228 
0229 
0230 
0731 
0? 32 
0233 
0234 
9235 
9236 
90237 
0238 
0239 
0240 
0241 
0242 
0243 
07 44 
0245 
0246 
0247 


0248 © 


0249 
0250 
N251 
07? 52 
0253 
0254 
N255 
0256 
0257 
0258 
0759 
0269 
Oe? 41 
026? 
07°63 
0? 64 
0265 
0266 
0267 
07? 68 
0269 
0270 
9271 
N272 
0273 
0P74 
0? 75 
N276 
0277 
0278 
0279 
0280 
CP R1 


{ 


{ 
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NUMBER OF BLOCKS IN QUFUUE 


ONE HOWDY IPF ONE BLOCK 


EF TRIS BLOCK 


INCREMENT GUTPUT POINTER 


TEST MSGG AVAILABILITY 
T RUEVE DATA ERROR 


REPORT OATA 


QUT GF ROUTINE 


ATA IN GUEUE 
SSAGE 3 BLOCKS? 

IF OVER THREE 

1 OF 3 

2cr 3 OR 1 OF 2 

3 GF 30 2 OF 2@ OR 1 NF 1 
TRANSACTION LOGGED 
NUTPUT POINTER FOR LIMIT 
NUMBER IN GUEUE IF LFSS 
IF AY LIMIT 


SEE IF NUMAQ IS NEGATIVE 


NUMBO AND POINTERS 


TS ANYTHING IN QUEUE? 


IF THERE IS 

NUMBO FOR SURE 
IMPUY POINTER 
NUTPUT POINTER 
SE SHAREU ROUTINES 


SE LENGTH WORK AREA 
TIAL MBUFF FULL FLAG 


THIS IS THE ENTRY POINT FOR SENDING DATA TO 


FIRSTO(18)sTRSTT 


TRPFYLEs IFT IS USEN FOR 
RE SENDS ANO ON LINE 

“RUFF AS A SINGLE 

Y TRE STUFF 


PSFLAG IS RESET AT THE END OF A 
APPROPRIATE POINTERS UPDATED AND 
SYSSS IS TAKEN. 


FOR PREV XMISSION COMPLETE 


FROM PAPTITION IF IT WAS NOT 
FOR BEGIANING OF XMISSIAN | 


BEaAnCH IF IT IS 


Ser PSFLAG TC 


ALL ZEROS 


INDICATES SUCCESSIVE RASS 
MRAUFF AVATL ABLE 

STUFF TRUFF IF NOT 

IS THIS A RESEND REQUEST 
SET UP FOR RESEND IF YES 


ISNIMNE OATA POLL 
PICTURE MATCH THIS ONE 


NEXT IF NOT 


ANY OATA IN THIS ONE 
CLOSE THIS IF NOT ZERO 
PREPARE MULL REPORT 


"SICAL XMISSTON 
IMAGE 
C BAS3(191),0NE CHECK 
BC HwYDYL(2)eHWDY3(3) 
QACERR S  ONEsNUMBO IGNOR 
: A ONESOTPPT(2) 
HC NFED+1(6)2CONSOL(5) GON TO 
MC ERROG6,NSGGO REPOR 
MC B8AZ(1901)4MSGQ46 
BC CkKOUTIS) CHECK 
ORG #05 
ERRO6 CM CTERROS! Ban O 
HWOYS CC RAS3i lal)» THREE IS 1 
BC QCERRI 3) »HWNY2(1) ERP OR 
8C SOLONG4+1(6)sHOWDY(5) WRITE 
HWOYS 8C SGLONG41(6)5NOWDY(5) WRITE 
HWOY1 BC SGLONG+*1(6)sHOWDY( 5) WRITE 
A ONE,TRCNT COUNT 
CKOUT CC OTPPTsINPXA CHECK 
BC CKNQ(1) CHe CK 
MC INPPASsOTPPT RESET 
C MUMBGeLI( LI oNINE 
BC CLRITY«(3) REScT 
CKNGQ C NUMBN, ZEROS 
BC OPDSK(3) LEAVE 
CLRIT “MC ZERNDS(2) sNUMBOQ CLEAR 
MC INPRPASsINPPA RESET 
MC INPPASsOQTPPT RESET 
RC OPSSK(5) RELEA 
ORG #5 
YORKS Om C#0000! MESSA 
YOUSE OM C1'0! POTEN 
& 
* 
* THE HOST COMPUTER FROM THE 
* HORMAL END OF NAY SENDS, 
* SENDSe THE CATA SNES TY 
% TRANSACTION. FOR PACKING 6 
* ROUTINE e 
¥ TRARSMISSION, 
* A PORTRAIT OF THE NEW 
*% 
SENDCK C LSTRECsZEROS TEST 
- RC #410(2)80P9SK(5) EXIT 
C wOReCMsZERDS TEST 
HC SENOTRI2) 
MC ZEROS(3) aPSFLAG 
MC EIGHT( 1) sMNROC™ 
SENOTR CC MARUPF+299(1) 00HE 
FSTONE BC STUFF(2)s,SECNDIO) 
C 7EROS(2)sPSFLAG+l1 
RC RSND1¢(1)2RSND1(93) 
MC DsIShrTnye FILAG 
WHRTO C CURPIC+4(2),NXPICe4 NEXT 
BC NXGTC1ISNXGT(3) GET 
C YRENTs ZEROS 
RC CLTAHS(93) 


ae 


aN 


wal 


SYSH 


SEN. 


CS56?P 
C504 
C564 
C548 
G570 
057? 
C574 
C574 
C578 
Cok 
058A 
O5&4 
C5R46 
CORK 
C596 
059A 
C594 
C594 
0598 
0600 
CANA 
G404 
C694 
15392 
C410 
O41 
C614 
C414 
Q4A18 
GC4A6 
OA22 
0C6?P4 
0476 
CA4AR 
0436 
C43? 
O36 
C434 
C632 
044) 
0442 
C4544 
Ob44 
CH4R 
C655 
0457 

654 
C684 
CA52 


0460 


066? 
OA4A4 
C64H4K 
0662 
C679 
047? 


2390C 
240°C 
2416C 
C4&P—c 
2430 
C44905° 
2&S0c 
C4445 
2450C 
2449C¢ 
2450c 
2460L 
2470C 
24R20C 
249nf¢ 
esaoac 
eSinc 
P5P0C 
e3530C€ 
2926C 
es3nc 
2840¢ 
25500 
eS497 
P5796 
eCSROC 
2575C 
25800 
ePsagar 
260NC 
26104 
26APDL 
2639C 
264NL 
26560 
P64b5E 
POETNC 
CAROL 
2696C 
2700C 
2790C. 
27AaC 
27300 
2740C 
2ISNS 
ePT46AG 
C770C. 
27TROC 
27990. 
CROOS 
OR1OC 
CROHC 
28100 
2EP0C. 
28 30C 
2840C 


TEN ASGSFMAL ER 


INSTRJDATA 


PI) TAZ AV 
QYTSPURI746T 
POAIIVK 4497 
PYNQIATP 349K 
POLS KAISY 
MWSIIPrCANANNA 


V¥VVVI 


V&EAVRE&K4D 
POISTAGAIP 
POQI7PANI1LY 
VSHIVEHR& EP 
PARI TAI79AV 
TRIP P2173V 
PPX7RA14&9Y 
SPLELPANNOAN 


947° 

LTTS9AVPRI7E 
TP.IGPEPILP 
PanPY1 ARN 
PL sDYANRIR 
V2AzSPOOANO 


QS 7p 

PRAITXANAIT 
POUWTTANWIP 
V5GIVESS& AP 
PA 2172172V 
TS vRPAITRV 
P7R7V13499OV 
PORVAGAICOY 
PIXADGERINM! 
RAV APS PAIP 
PPYIRATADY 
SPuiiPA PAGE 
VORSELER5QRP 
PERSHISNQP Ww 
PILAQAVAOR IR 
UPXTPEPTSE 
PNRAEF ANA ID 
PLA YYIATAR 
V&TPRROQP 
LTVS XRANRRT 
PII7V1 SAAN 
RO VYER1aADP 
LI SSLIANR IR 
USRVPRAANN 


ATT&AP 

PI4SYI1I7ET 
P2KTXANLEK 
RZAKTPRPRAP 
P&SMWI174V 


TT 


13 


0% 


a9 


NA 


ng 


OR 


LAOkDA @& MOTS 


wOororFdo®h wIoouo-f5 
OoOosD 


Koof- 
oo 3290 
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VoD 
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“7 
Cal 
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4434C 
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3496C 
‘elezele 


NN06 
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4#640C 
0310C 
N314C 
B4sé0C 
17360. 
1736C 
14997 
‘aT ex ere) 


n004 
92370C 
P349C 
2395C 
OR72C 
0000 


GOQS4 

O314C 
O3A106C 
5440C 
1736C 
1736C 
3106C 
5195C 
Siage 
P690C 
14997 
24690 
5950C 
02277 
08 7PC 
2750C 
0670C 
P720C 
&O30C 
OR B40 
&SO5C 
19?P0C 
O272C 
onan 


NGO5 

1744C 
0&SRC 
2260C 
1746C 


~ TV wd 
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oo ooo90 


e020 00 0 30 


oo o0 © 


LINE 


O2PR2 


0283 
0784 
0785 
286 
287 
N2&R 
0289 
0290 
2791 
0292 
1293 
0794 
0235 
9296 
0297 
0298 
0299 
0300 
0301 
0302 
0303 
0394 
C305 
0306 
0307 
0398 
0309 
0310 
0311 
9312 
0313 
0314 
0315 
0316 
0317 
03138 
0319 
0320 
O3e21 
0322 
0323 
0324 
9325 
0326 
0327 
0328 
N3e¢9 
0330 
0331 
0332 
03393 
0334 
9335 
0336 
0337 


EOTD 


Ent 
CLTHS 
NXGT 


ATAD 


RSFST 


ATBD 
RSND1 


RS GOOF 


SECNO 
AYET 


FLMB 


CXTIT 


ATTQe 
BEEN 


& 


ed © 
FN 
MN 
MC 
MC 
AC 
ORG 
Om 
QRG 
DO™ 
BC 
MC 
MC 
BC 
NC 
$ 

Cc 

BC 
CRG 
OM 


ORG 
tr 
MC 
MC 
BC 
MC 
S 
MC 
Bry 
c 
BC 
C 
BC 
BC 
MC 
MC 


AC 
A 
RC 
ORG 
os 
MC 


SICAL XMISSION 


- 
Pd 


CURPIC4+4(2)s»HOLPIC 
ONE (1) oF LAGL(3) 
NXTANs RPOLLIM 
CURPIC44(2) sHOLDAYs+2] 
DAYNRS (2), HOLDAY 
BEES) 

4-6 
C'vvVvv0! 

wat 
Cc 
CLOSST41(6),CLOSIN(IS5) 
HCMAD, ADOR 
NXPIC+4(2) sA0DR44 
CLAC4#1(6)eGETPIC(S) 
ANDR+4 (12) sHILPIC 
*(L)e2HOLPIC 

TRCTRs ZEROS 
RSFST(3) 

yah 
AtTRMZAD! 
TwOsNXPIC#4(2) 
¥e1014) 2 WHRTN( 5) 
FIVE sFSTONESS 
ZEROS(6)eTRCTR 
AYET#5) 

¥ oS 

AtTRMZaA0! 
PSFLAG41(2}2ADDR44 
HOMAID( ) » ADDR 
CLAC+1(6)43ETPIC(S) 
ADOR+4(2)5H0LPIC 
*(1T) e2HOLPIC 
Re ISNINE 
TRSTT#1(5),TESTIT 
TRSTT+1(5) e,7TESTIT 
*™4+1002)2RSS00F (5) 
TROTP, ZEROS. 
RSFST(3).eRS3GO0OF (5) 
NEEN4+1(6),C°9ONSOL(5) 
FRRA721SSI 

ZFROS(6) sTRCTR 
BEEN(S ds FLINB(S) 
TROT Ts NXSEC 
ZEROS(1)sSECNO 

DOLL Y*1(6) sRELLO(S) 
SEVEN, MBUEF44( 3) 
MRUFF+299(1) 20NE 
CNTIT(2)290PCSK(5) 
ONEs TRCTR 

STUFF (5) 

¥e5 

ClaTrrToet 

ZEROS(3)2F LAGI 


C SAYNRTSNAYNRS 


BC 
MC 


ee1TO(ePe,REENI (5S) 
GONEs»FLAG1+2 
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IMAGE 


REPORT CURRENT PICTURE 

SET FLAGS 1°2e3. TO 001 

SAVe THE SENT DATA ADDRESS 

Save NEXT PICTURE NOe IN HALA AREA 
SAVE NEYT DAY NGe IN THE HOLD AREA 
G9 TO SET=tIP *6£ND MSG FOR STIFFING 
USE ANY UNUSED SPACE 

ENT COMMUNICATIONS CONSTANT 

USE SAE CHARACTER 

ENT CHARACTER CONSTANT 

CLOSE CUFRENT PICTURE 

SET VWF OISC ADDRESS 

SET THE MXPIC ADDRESS 

GET PICTURE IN TRMZA 

SAVE PICTURE BEING ACCESSEN 

ADJUST IT TO 4CTUAL PICTURE NIIMBER 
ANY OATA IN THIS PICTURE 
RESET FIRST TO UNCND &RCK 
USE ANY UNUSED SPACE 

ANDRESS CF TRNZAD 

TRY NEXT PICTURE IF NO DATA 
ALLUW WRAPARCUND ON OVERFLOW 
FSTUNE NGW SKIPS PRECEDING 
CLEAR TRANS COUNTER 

START LOADING BUFFER 


HFRE 


ANORESS CF TRMZBD 

SET PICTURE CODE 

USE WOMAN FOR RASE 

GEY RESEND PICTURE 

SAVE PICTURE BEING ACCESSEN 

A)UUST IT TO ACTUAL PICTURE NIiMBER 
FLAG JISNINEF RESEND POLL 

SET UP FOR TEST OF PICTURE FIFLD 
TEST TRSTT FOR VALID NUMERTCS 
E225R IF NO MATCH 

ANY DATA IN THIS PICTURE 

G) TO RSFST FOR VATS OR REPORT 

GO TO TEST MS30 AVAILABILITY 
MESSAGE TO OPERATOR 

CLEAR TRCTR FOR NULL REPORT 
TRANS LIMIT TO BEEN OR FTLI 
RESET NXSEC 

NOeJP FIPST HALF OF SRANCH 
FILL HBUFF IF THERE IS 

SET LENGTH YO DESIREN CHARS 
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CouwT THIS TRANSACTION 
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LOCN INSTR/OATA OP A/R M I B/S MI LINE IMAGE 
2i34 1066 +#* INQUIRY FROM THE TERMINALS». THE STATUS FOUND ON OISC 
2134 1067 * YS TAALED IN CREOT ALONG WITH THE CURRENT DEVICE6 
2193 1068 »* WHEN RETURNED TGQ THE PARTITIONs A CHECK IS MADE TO 
2149 1069 *¥* VERIFY THAT THE DEVICE REQUESTING IS ACTUALLY THE 
2142 1070 »* DEVICE BEING ANSWEREDe IF THE ACCOUNT NUMBER waAS NOT 
2144 1071 * ON THE FILEs A NOT HERE CODF IS RETURNED TO TRE TERMINAL 
2144 1072 »« be RS 
214% 7F2SECO PPAAwWANKT7V OR 22770 0 0 O476C 2? O 1973 CIREP MC WORKS+2(2),5TNL MOVE MESSAGE LENGTH JU TNL 
2159 7P70C P&457V1395Y O& 4463609 0 2959C 1 0 1074 MC NINE sOCGDE Move A NINE INTO DCOpPF © 
2157 72R20C FPP5517531i 14 0055 A 9 75635C 1 0 1075 C ItRBuF+2(4)2ATSGN DNES THIS Cl HAVE EXTRA tet 
2154 7250C R7SPPS73°P 11 73000 P O 7320C 5 O 1076 BC ATCRD{i2) »sNOTAT(5) ADJUST IF YESs ELSE NURMAL 
P156 7309 LT IPHAQATV 97 45050 1 0 0676C 2 0 1977 ATCRDB S ONE) se TNLI2). DECREMENT LENGTR BY ONE 
2158 7310C YPAUS6ANSSE 15 0085 1 0-0056 § O 1978 X INBUF42(15)2 INBUF 43 ADJUST FIELD | 
2160 73PNC LT IPLIANAZV 97 45050 1 =O 04760 A O 1079 NOTAT S  ONEs TNL DECREMENT BY ONE 
P1IBA IZBAAT OPTAVANATV 14 O4340 0 DO O676L P O 1080 C ACLNT(2)aTNL CK MIN LENGTH ACCT NU“RER 
2164 73490 S7IRPHOANN 114 7510C 3 0 ONDN 10 1081 BC MCVCD(3) GET OUT IF TOC SMALL 
2144 7350C 7348C 1082 NKZ 2 USE ANY UNUSEG SPACE 
2168 734RC 10 Ono1 0002 1983 TEN DM cr1ot CONSTANT OF TEN 
2170 7350C PPTS¥Y2NA7V 14 0438609 N474C P O 1084 C ACLNT4+2(2) TNL CK MAX LENGTH ACCT NUMBER 
2177 73600 Q7.igPAAGAD 11° 76100 1 9 O00 4 0 1085 BC MGVCN( 1) GET QUT IF TOO LARGE 
217% 7379 1LTIPHPOKAIV 07 45050 1 O 0676C P O 1086 S ONEs TNL DECREMENT TNL BY ONE MORE 
2176 73RGC PNSavt745P 29 44760 0 0 74500 1 ~«0 1087 MN TRL(L)aF IXIT MOVE THIS NUMRER LENGTH 
2478 F3A9CC POAKK174&&E!I! OF C6770 0 6 7455C 1 0 1088 MN TNL+21(1) 0F IXIT45 TO FIXIT INSTRUCTION 
2189 7FOOC PCH VE 7KEP NG OF7EL 1 O 7440E 1 0 1089 MN TREO tL) 2CHKIT SET 'At LENGTH MODIFIER IN CHKIT 
21AP 74160 PORN 764AI! OF O4770 0 0 7465C 1 O 1090 MN TNL4#4¢1) 9 CHKIT45 SET '8'! LENGTH MOOIFIER IN CHKIT 
21RG 7HANT ALEIVINIWES OR 14990 1 0 09155 3 0 10914 MC ZEROS(13),TACC CLEAR YACC 
P18hA 74300 POs%6ET&N0D11 OR N&640 00 O11 4 9 10992 MC ACNSL*sREGI SEARCH LENGTH TO REGI 
218R 744O0T 2PvVeVaNNIT O7 Gh&76C 2 0 0011 4 0 1093 S TALAREGI AONJJST POINTER 
2199 7450 NONGS5CAIES 09 9055 1 0 90155 7 1 1094 FIXIT MN INBUF+2(10)}59 TACC(31) MOVE NUMEER TO TACC 
219P JFHAGE QFA7550015 14 9955 1 090 4155 9 1 1995 CHKIT C  INBUF+2(10)sTACC(51) TEST FOR VALID NUMERICS 
P19% 7H7OCO R7ITKESN4’AN 13 788A 2 6 9400 5 O 1996 BC #410(2)sTAGA(S5) GO TO REPLY NAK IF NOT NUMERTICS 
2196 76800 20155201495 98 9155 1 0 0169 30 1097 MC TACCsTACC MOVE TACC TO TEST AREA 
219% 74900 V7IIVAS7H4P 11 = 75810 & O 7H4OC 5 OO 1098 BC RNDXIT+4¢1(6)2RNADR( 5) DETERMINE DISK AGDRESS 
P205 F759CC V7YSRAT7AOP 114 #79310 & 9 746&00C § O 1099 BC FENISC+1(6)sSEARCH( 5) SEARCH AITSK 
220P 7Hit0C PAYAITITTIP OR 9049 OO 0 14460C 1 3 1100 MOVCD MC DEVICE(1)sCREOT+1( 23) ANSWERING PARTITICN 
226% 75200 P395Y11TTR OR 3959C 6 O 14410 1 3 1101 MC OCONFs CREDT+2( 53) DISPLAY CODE 
2°06 753CC UlePPROANnNANN 11 10C00C § 0 0000 4 O 1192 ROUT BC a5) RETURN 
Ze0R 75400 735 C 1103 ORG #=5 
2210 7538C 4 0001 0001 1104 ATSGN DM Cto? COMHERCTAL 'tAT!' SIGN 
2eie 1105 -» 
2°14 1106 * THIS ROUTINE DETERMINES A DISC ADDRESS FOR EAC ACCOUNT 
PP14é 1197 »* NUMBER GIVING A SMOOTH OISTRIBUTION FOR THE CREOIT FILE. 
22iRr 1308 * 
2729 754OC C1L49YKANIRP 98 1499 1 0 O18F 6 0 11909 RNANR MC ZFROS(16)s/NVND CLEAR Dvted BUFFER OF HIGH RITS 
P2PP FASCC 9O16SCO1RR NR 9155 1 0 01R8 10 1110 RNADRYL MC JTACC(10)sD0VND+6 SET LOWeORDER OF NUMBER AS PYVIDEN 
222% TREC SBP IYWORO1RP O65 03970 & 1 O1RB 140 ee et D PRIME, QUO DIVIDE RY PRIME 
2226 7FE7ICC PO01924931P O88 0192 4 9 O310C AO 1112 MC REM», ADOR USE REMAINDER AS BASE 
PPPR THROCT B6P4&NGKNAIP O& 04030 & 0 0N31NC 4 O 1113 A STADR», ADDR ADD START FOR ADORESS 
2?309 76900 UORPPP_ANNNA 114 O2700C 5 9 0000 009 1114 RNOXIT BC 0(5) RETURN 
223? 7600C 7595C 1115 ORG sed 
2234 7595C ERRO1 NN01 0005 1116 ERROL OM C'ERROI! Or1SC PARITY ERROR 
2236 1117 *»* 
223 1118 -* THIS ROUTINE SEARCHES THE CRECIYT FILE FOR A NATCH ON 
2740 1119 * TRE DATA IN TACCe TACC CONTAINS THE ACCUUNT NuMBER DUPTNG 
224? 1120 * AN INQUIRY, CHANGE OF DELETE AND ZEROS NURING ANDITTONS 
C244 112i * IT REPLIES wWITh A NUMBER OR A NOT HERE CODE AFTER 
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2246 1122 »* SEARCHING ALL POSSIBLE LOCATIUVS IN THE FILE> THIS 
2288 1123 * DOES NOT MEAN A SEGUENTIAL SEARCHe DATA IS RANGOMIZEN 
2259 1124 % TO A SECTOR ANO LINKEO DIRECTLY TG AN OVERFLOW AREAe 
225A 14°88 
2°54 FOC )14a9V123298Y NR 14990 0 90 3958C 1 9 11426 SEARCH MC ZEROS(1)sCTI1 RESET NISC ERROR COUNTER 
2256 7610 O9DS5NNAIP NN 1055 0 090 N3190C NO 11°7 ROINS PR DATA(0)sAD9DR(0) READ RISK 
P2563 76PNC R7IVXPITHAP 11 77K8O0C PO 7HH00 320 1128 EC AGNCM(e2)»B406(3) BEGIN COMPARE IF GOOO 
P2600 763CE vSUTnNi SAA 11 57410 A O 56300 1 O 11°9 BC OSOFE+1(6)s0SOF(1) TQ OSNF JF DISK IS OFF 
P26P 7640 PSYSx¥1749Y 14 39580 NO 14990 19 1130 C CT1sZEROS CHECK COUNTER 
226% 756500 STIVEPRACNS 11 746100 30 090000 409 1131 BC RNINS(3) RETRY IF POSSIBLE 
276H 76600 VE"8hRRSTEP 11 57710 A NO 57800 5 0 1132 RAC6 BC DSSACE+1(6)29S8AD(5) TO OS3A0 IF NOT OFF 
F2OR FEIOL PPTAEQKNIW1P 14 14210 N O 032400 4 8 1133 C BOLtK, ADDR TEST FOR BAD LINK ITSELF FOR RAD 
2270 7aARNC RIVYPKR77eEP 11 76&90C 2 O 7760C § O 1134 BC *+410(2)esMNVBAD(5) Go TO SET IT IN ADOR IF NOT BAN 
PE7TP 76980 YWSAPANAIP NOW 7690010 903105 & O 1135 A s(t)sA0DDR INCREMENT THE BOLNK EQUIVELENT 
CA27% TIOCO PPSTPANSNY 14 031000 «OO N4O9SE & O 1136 C ACNDR»sLOVEL TEST FOR END OF CREDIT FILF AREA 
PETA FIGS SIATEPANOIN 11 °£77400 410 9N5N OO 1137 BC BANGHUD(I1L) GQ TO SET NEXT S8DLNK IF NOT FNO 
2°78 F7PAS BNIQTSVIANIAS 14 14990 10 9169 390 1138 C ZFEROS(13)s TACC TEST FOR taOD! TYPE SEARCH 
2PRI) 7F7ICK RIOSPRTRKRE 14 FOSNC PO FRRNC § O 1139. BC OVFFUL(2)4NOFND( 5) REPORT EOF IF taOD! ELSE NOT FOUND 
2282 F7K6NT POWPANSATD OR 03100 NO O421C 6 O 11490 BADGUD MC ADDRsROLNK ADJUST BAD LINK TO NEW VALUE 
2284 7789C VSTSQR531P 11 546310 6 0 5310C 5 0 1141 BC POROUT+41(6)»sPORTRT(S8) GD) TO UPOATE THE SyYSS ON OTSK 
PPR F76GK FOSFRANBAIP AR 04210 GON N31N0C 6 O 1142 MOVBAD MC BOLNK, ADDR SET BAN LINK ADDRESS FOR ACCESS 
22RR FTIICC tI7 VE OGKOAAN 11 76960 § 80 ON00 OO 9 1143 BC SEARCH(5) RETURN TO SEARCH . 
229%) F7TRCO P143Ya8NN14 NB 14990 0 0 ONLY 4 0 1144 BGNCM MC ZEROS(4)sREGI 
P29P F79DC YPP4S4P1K49 18 0055 9§ 1 4169 4&4 0 1145 COMP C DATA(s1)s2TACC LOAK FOR TACC 
Pe9e& FROOT RIFYERPAANNG 11 7O900L 2 0 A009 On 0 1146 BC FOUND(2) TO FOUND IF MATCH 
P2296 7RICC €P49KHNN11 O& NKIBT PO OC1IL & O 1147 A ACLNT42(2)eREG1 INCREMENT REG1 BY MAX LENGTH 
2298 7TRPUL PPAH1PABWHAIS 14 NNTP 9 9 943373 0 1148 C REGIi¢1(3),LDOATA CHECK FOR LAST ACCOUNT 
P305 FRAGT G7 avPA779P 11 #77900 19 7790C P O 1149 BC CG4P(1)5sCOMP(2) BRAKCH TC COMP IF NOT 
230P 7R4GC PR 1498149Y 14 01149 4 0 1499C 6 OQ 1150 C -LNKAOe2 ZEROS CHECK FOF LINK TO OVERFLOW 
230% 7850C R7F7XKPNNHAN 11 FRBOC 20 07000 14 1151 BC NOFND(2) NOT FOUNO IF NO LINK 
2306 7RB4SANG PCOI49GKhANBZIP AR 6149 O GG O310C 46 O 115? MC LNKADs ADDR LINK TO CVEPFLOW AREA 
2308 7a7AC UFveEPANAAN 11 76000 5§ 4A 40090 94 O 1153 8C SEARCH(5) CHECK OVERFLOW AREA 
2310 7BRDNC 7F7RITC 1154 ORG xe} USE ANY UNUSED SPACE 
23%2P 7FR77C ANGI 6001 1155 ANS OM Ci RESPONSE BUFFER 
P314 FRIRE YN NACL 9001 1156 Oo DM Crp 
2316 7&79AT R Onell 0001 1157 R D4 Cree 
2312 782850 P43711139S5Y 98 43750 0 4 3959C 1 0 1158 NOFND MC NGTHRsOCODE NOT HERE COOE TO vDCODE 
24329 7FRICT UTYSPQAANNG 11 7930C § 0 9000 490 1169 BC EXNOSC(5) END SEARCH 
P3°>? 730NC . 7895C. . 1160 QRG s2e5 USE ANY UNUSED SPACE 
232% 7RIFL angus nol 0005 1161 ASTPSK DM Ctaseyet ASTERISK CONSTANT FOR FILL TFST 
23°65 7FE00C 2P43K4N011 N& O83BRO PO 011 4D 1162 FOUND A ACLNT+2(2)sREGI ADJUST POINTERS 
P3PR F9INC 1F7-1Ftianni1 OF 4505C 1G GOit 4 0 1143 S ONEs,REGI TO POINT TO CREOYTY STATUS 
2339 792°GC PONN5K1SS5Y C8 0055 O 1 3959C 1 Nn 1164 MC DATA( 141), 90CODE CREDIT STATUS TO DCONE 
233° 7930C UOPPPNANNA 11 O000C § 0 0900 nO 1165 ENDOSC BC O¢(5) RETURN 
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234% 1171 a ROUTINE WRITES IACC IN THE SELECTED PLACEe 
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1205 
1206 
1207 
1208 
1209 
1210 
1211 
1212 
1213 
1214 
1215 
1216 
1217 
1°18 
1219 
1220 
1221 
1222 
1223 
i224 


1225, 
1276 


1227 
12°28 
1229 
1230 
1231 
1232 
1233 


MOVER 


WINS 


ACADED 


BAD7 


aexexeenx k 


ERE 


WIINS1 


BADds 


WRNOS 
LNKEM 


MC YACCsNATAl 21) 

NC ZEROS(1)sCT1 

BC ON TRK4+1(6) sCHKTRK(5) 
Wo DATA(O)s ADDRIO?) 
0(2)2B4AD7( 3} 
DSOFE+1(6)sDSOF(%) 

C CT1isZERGS 

RC wTINS(3) 
OSBALE+1(6)sO0SRHAD(5S) 
C NxXTBOsLOVFL 

OVFFUL (3) 

NXTBOs ADDR 

& ONEsNXTBD 
POROUT+1(6)sPORTRIT(5) 
NXTBDsLNKAD 

wTINS(5) 


IMAGE 


MOVE IACC TO DATA 

ZERO ERROR COUNTER 

GO TO PRE*ALIGN DISK 4RM ON TRACK 
WRITE THE DISC SECTOR NOW 

ITS ADDED IF WRITE WAS GOOD 

TO DSOF ROUTINE IF DISK OFF 

CHECK ERROR COUNTER 
REPEAT IF POSSIBLE 
REPORT RAD SECTOR IF 
CHECK FOR FND OF FILE 
REPORT OVERFLOW IF NO ROOM 
TRY NEXT SFCTOR 

INCREMENT SAVE AREA POINTER 
TAKE A PORTRAIT 

FORCE LINKAGE IN SAVE AREA 
GO TO WRITE INSTRUCTION 


NOT 


ard 
THIS ROUTINE ALLOWS FOR A REWRITE DURING CREDIT FILE 
BUILD OPERATIONS SHOULD IT BECOME NECESSARY TO GO TO THE 


OVERFLOW AREAe 


A OQNEsNXLNK 

C NXLNK»s BOLNK 

BC #410(1 ds OVFFUL (5) 

BC PCROUT41(6),PORTRT(5) 
MC NXLNKsLNKAD 
ZEROS(1)sCT1 
ONTRK41(6) sCHKTRK(5) 
W PATA(O) er ADDRIO) 
LNKEM(2) »BAD8(3) 
DSOFE+1(6)s0SOF(1) 

C CTtseZERUS 

BC wTINS1i(3) 
ODSBADE +1 (6)2s0S8AD(5) 
C NXTBOsLOVEL 
OVFFUL(3) 

MC NXTBD»sADOR 

A ONESsNXT8D 
PCROUT*1(6)sPORTRT (5) 
NX TBD» LNKAD 

BC WTINS1L(5S) 

ORG ¥e5 

COM C'wRNOS! 

MC NXLNkK» ADOR 

BC ADHIM(S5YS 


INCREMENT TO NEXT OVERFLOW SFCTOR 
TEST FOR END OF OVERFLOW SECTORS 
MESSASE TO WORK STATION IF FOUAL 
TAKE A PORTRAIT 

NEXT LINK IN LNKAD IF NOT 

ZERO ERRCR COUNTER 

GU TO PRE@ALIGN DISK ARM ON TRACK 
WRITE THE DISC SECTOR NOW 

TO LNKEM IF GOOD WRITE 


TT) OSOF YF DISK IS OFF 


CHECK ERFOR COUNTER 

TO aARITE AND WAIT IF IT WAS 

TN REPORT BAC SECTOR IF NOY OFF 
PREPARE TO SAVE DATA 

REPORT OVERFLOW IF NO ROOM 

TRY NEXT SECTOR 

INCREMENT SAVE AREA POINTER 
TAKE A PORTRAIT . 

FORCE LINKAGE IN SAVE AREA as 
TRY TO WRITE THIS DATA 7 


C/I OVERFLOW FILLED 
PUT LINK ANORESS IN SECTOR DATA 
RETURN TO ADD 


TRE GETSYS ROUTINE READS THE SYSTEM STATUS SECTOR INTO 
CORE DURING INITIALIZATION OR RELCAD 


HOMADs ADOR 
7ZEROS(1)sCT1 

R SYSSS(9)sADDR(0) 
BC 0(2)28AD3(3) 

BC DSOFE+1(6)s20S0F(1) 
C CT1i.sZEROS 


HOLD ADDRESS FOR ERRORS 
ZERO NISC ERROR COUNTER 
READ SYSTEM STATUS SECTOR 
GET OUT IF GOOD 

REPORT SOFT ERROR 

CHECK RETRIES 


O 


(> 


ae 


tw 


LOCN 


8430C 
B44ne 
B456C 
S460C. 
B8455C 


24400 
834 70C 


? B4R00 
8490C 


865N0C 
8510C 
852GCL 
8530C 
ROPRC 
8B53NC 
2540C 
R550C 


+ 8560C 


8570C 
8565C 
BS70C 
85R2G6C 
85900 
BANNC 
B610C 
B6PGC 
B630C 
8625C 
8630C 
B64%OC 
BE5NC 
866CC 


8655C 


$661C 
8799C 


BBOOC 
BRI 
BRPOL 
BR ACL 
B&anle 
8850C 
BR60C 
8870C 
88RNC 
8890C 
890ac 
8910C 


EN ASSEMAI FR 


INSTR/NATA 


SRSYPNNDNNHN 
VS waNhS75P 
UBSWRPNOANDNNA 


ATTOR 


POIPARASI 
PX SPXPRASY 
P1&YV1 REAP 
NOPNOH RAS 
TRINPIRS PP 
UOPPPAnNNL 
PayTPaAnaANH 


92 | 
P&5PY1 RS AP 
POOP TY R541) 
PPSAVIN|AAW 
RBUXP1RAAP 


1 

VOSA18N34N 
PRAPIIROAAw 
PRASIIANRAS 
PX 16111149Y 
VOSW1TANREN 
UR TYPANANN 


WRNGG 

XR uUPHAAANNH 
LTRONUPRASY 
US TXENANNDG 


90n00n0nNn 


ITSCUaNIANR 
GO48aPON|ANnH 
PSSA 4NAY 
PO>PAnQNNANA 
POPPANAANN 
AVSKURAANNNA 
O9OANIRIANNIwW 
N9OSKHANNANDA 
OLIASANDAN 
O95WNKONOLU 
OOR7HSENNG 
PP S758 9431) 


TT 
op 


11 
11 
11 


nN 
0&8 
OR 
11 
11 
01 
1 
91 
01 
01 
00 
14 


CRN&02 @- MDTS 


A/R 


R390C¢ 
5771. 
R370C 
8455C 
0001 


02310C 
RS28C. 
18990 
n?00 

RS10C 
cooocr 
R640C 
8528C 
ann1 

&509C 
on0ac 
023266. 
R580C 
R565C 
NnN01 

0271 

R250 
8655C 
8565C 
0271 

R4&90C 
RH25C 
0001 

assoc 
&505C 
ReR0C 
84&55C 
Nn01 


87990. 
0000 


4&5 050. 
9440f- 
&SO5C 
Nn00 
erenete) 
9585C 
941eC 
9585C 
1119 
95871C 
O275 
0375 


nN Ff ODND 
90090000 


M 


WMPoOBdIaDT N90 093 


GO} ~ oO 
o20 


© he ie oe io Ho He ie ire Mo Ba 


WO WW) 
o0oO°0 


I 


ooo 93 


9eooo0 9 


oe he eke ie re ire He io re Be) 


R/S 


no000 
5750C 
0000 


0005 


R655C 
8659C 
&520C 
8655C 
R520C 
6009 

0090 


o0n0e2 

&520C 
8565C 
032e7C 
8630C 


0001 
03490 
O0327C. 
O0333C 
1499C 
0340 
0000 


0005 
00900 


86590 


6000 


0006 


noo! 


0302C 
0300 

4078C 
ano0 

9000 

On01C 
On17C 
nnn01C 
OOO1C 
Ocosc 
necsc 
9435C 


4. 


Ooms 


99 “9 = USA 


ovo PF OW 
o2320000 


oNOA 
oo980 


AMNKIwWwWdt-wrIra-IVD6F 


o> eh af wh 


SYSTEM WITH cHron ‘ ICAL XMISSION 


if 


fo eo ie) 


90 0qo90 0 00 


oo0c 9° 


ooo0oo0o 92 00 9000080 


LINE 


1234 


1735 
1236 
1237 
1238 
1239 
1240 
1241 
1242 
1243 
1244 
1245 
1746 
1247 
1248 
1249 
1250 


1?51 


1252 
1253 
12°54 
1255 
1256 
1257 
1258 
1259 
1240 
1261 
1?62 
1263 
1264 
1265 
1?66 
1267 
1268 
1269 
1270 
1271 
1272 
1273 
1274 
1275 
1276 
1277 
1?78 
1279 
1280 
1281 
1282 
1783 
1? 84 
1? 85 
1? 86 
1287 
1288 
1289 


CHKTRK 


CHKTRC 


TRKRD 


ONTRK 
CHKPNT 


NINES 
walT 


ISITO4s 


WRNIOI 
GwAI Ts 
TRKBD 


ADORCK 
% 
¥% 


QREGIN 
% 
% 


* 
LOADST 


ASK4IT 


BC Gwi(3) 

BC NSBADE+1(6)20S8AB(5) 
BC GETSYS(5) 

ORS #=§— 

OM CraTTOs!? 


THIS ROUTINE PERFORMS THE FUNCTION OF A 
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IMAGE 


REPcAT IF POSSIBLE 
REPORT BAD SECTOR 


REeTRY APYWAY 


SYSTE“M CLOSED PROPERLY 


"READ BEFCRE WRITE? 


TO ASSURE PROPER DISC ARM POSITIONING SEFORE WRITING DATAe 


ADDR» ADDRCK 

A NINE8s ADOROCK+4(2) 
ZEROS(1) sCHKPNT 

R 200P(0)s.ADDRCKIO} 
41014) os CHKPNT (1) 
015) 

TRKBO(O) 


c'98° 

FIVE sCHKPNT 
4C(teISITos 

C FREE»sMSGO 

42012) sGWAITS(1) 


crie 
LEAVIT41(6)sTELLEM(S) 
wkNS9,4SGO 

EDORCK sNSGI46 

C ISITON4s,ZEROS 

LE AVIT41(6)s TELLEM(2) 
TRKRD(S) 

ORG #05 

OM C'4wRNIOY! 

BE wWAIT4(8) 

A ONE, ADORCK4+4(2) 

BC CHKTRC(5) 

ORG se§ | 

Om ¢C#N00000! 


ORG 8799 
OM Oci 


GET DISC ADDRESS FOR ADJUSTMENT 
ANJUST TO REAN PRECEEDING SECTOR 
CLEAR THE FIRSTeTIME BRANCH TNSTR 
READ PRECEEDING SECTOR TO NOWHERE 
BRANCH TN CHKPNT ON PARITY OP 
TRACK CHECK ELSE EXIT 

FALL THRU ON 1ST TIME ONLY FLSE GO 


CONSTANT OF NINTYEIGHT 
SET 1ST TIME BRALCH AFTER 18ST TIME 
GET PARTITION ZERUS ACTIVE RIT 


IS 4ESSAGE QUEUE AVAILABLE ? 


GO TO WAIT IF IT IS NOT 

USE ACTIVE BIT AS BRANCH MNOIFIER 
ACTIVE BIT AREA IN INSTRUCTIONS 

GO TO CCNSOLE REPORTING POUTINE 
SET WARNING MESSAGE FOR CONSOLE 
APPEND THE CISC ADDRESS TN IT 

IS THIS NOT PARTITION ZERO 

G) TO REPORT THE COMOITION IF NOT 
GQ 6ACK TO TRY IT AGAIN | 


WARNING MESSAGE 

SWITCH PARITIIONS ANO TRY AGAIN 
INCRe TO READ NEXT SECTOR 

GO TO READ THE NEXT SECTOR 


USE HIGH COMMON FOR QUEUF AREA 
REGINNING OF QUEUE 


THIS ROUTINE IS ENTERED UPON EACH RELOAD OF THE PROGRAM 


A ONEs INPXA 
XROQX(10) ROX 
ONE s BLOKAC 

OP (0)20P(0) 
0P(0),0P10) 

Ww CR(0)4113) 

W TITLE? (O21217(1) 
W CRI(O)51(3) 

W CARRET(0}21(3) 
Ww ATTO4(0)s5(5) 
R LAREL(0)s5(5) 
C LABELS DINTL 


SET INPXA 
RESET ROX 
BLOCK ALL 


BELOW EVEN LIMTT 

FOR NORMAL OPERATION 
ACTIVITY DURING 1 049 
NOe)P B8UT HOLO CORE POSITIAN 
NNe# JP BUT HOLD CORE POSITION 
OVE CARRIAGE RETURN 

OISPLAY MODULE ANDO RELEASE DATE 
ONE CARRIAGE RETURN 

CARRIAGE RETURN 

REQUEST ACTIVITY LABEL FROM OPER 
READ IT 

CHECK INITIALIZATION REQUEST 


Pr 


a 
: 


aor 
C4 


"ay 


LOCK 


RAIPOL 
S930C 
RI6CCL 
RO5aF 
B89E0C 
B9O70OC 
BIRO 
R990C 
39006C 
9010C 
90FCC 
993N¢4 
9040C 
9N50C 
SNANE 
90707. 
SO0R0C 
9090C 
91NN0C 
9L110C 
9120C 
9L3NC 
91460C 
9150¢C 
9149C 
917°C 
FIRCL 
9190C 
920CC 
3210C 
92?PC0C 
92° 30C 
3246¢CC. 
3PAAC 
9260C 


9270C 


9280C 
92966 
93°0C 
93210C 
9320C 
9330¢ 
9340C 
9350C 
9240C 
9370 
9240C 
9399C 
S400r 
9470C 
9426C 
9430C4 
9445C 
9435C 
9440C 
9450C 


TEN ASSErRRE ER 


INSTRSNDATA- 


RRYVI'PARNAA 
PPSG75R964y 
RIT KXORRK ja 
ALII99NNNYA 
OBRUVAEOAAE 
D00327YS004N 
AVIRA GINAAY 
SOWYSACKN 
O7RTIWENAN 
PwxX7W1 4A 3 
ABVUIPARASH 
POI TAC3Z4O 
LI SIYVANAGP 
PONSARENAAY 
POIWYEODIVG 
2PSYSANI3S49 
STAPuUPNS Sx 
POSS xen qev 
VEVGSQA4B4GDP 
OGNAFANI1EP 
QNIU.VENHIIP 
RIGIVIPRI1 Ar 
PCI’PVANASY 
V4 .JIVAR&ARD 
P4YAIV143974 
NPILGQONTRIN 
VE TEQRRY IP 
RP eSXkOLAT 
LTPP lhaN&AT 
RPS X4S0O4KAP 
ITSCUSNK AD 
POAVVIF7T9OP 
POQuyuit 779i: 
POeS¥1 79 9p 
PQ&aSyv179Siy 
P72¥PA7NIE 
PN4y81bAT7P 
POASVSITAATEH 
PNevVITESP 
PNavWwt 755811 
POSSE THEAERRO 
OwSTYSSSRNA 
Q9SVPAP9AAP 
2YSRS4& TEN 
POSVRIAGRP 
POSVS1GE&RI 
~64xXPAAG DIE 
POSVRI AACR 
POSVSIAASGI 
PHRIYVEASRY 
V6LIYQR4&8QR 
ULvxnnnnnan 


DINTI 
WISYSECOARO 
QIFIPATRAN 


TY 


NP 


13 


CRNEO2 © MITTS 


AZ/R 


R95CC 
9375 

Si &80C 
1119 

9576C 
9279C. 
11419 

NA79C. 
TFRITC. 
7A77C 
R950C 
N3A54C 


4506C 


NAb!]|C 
9379C 
O293C 
4505 
O458C 
4431C 


. 95606 


9460C 
97400 
N379C 
&761C. 
46439C 
94650C 
R4N1C 
Nw BRC 
6H05¢ 
N&3RC. 
4&aS505C 
N&66C 
N467C 
O4& 32%: 
0439C 
7930C 
N&EOC 
14636 
04666 
N4467C 
N4&64C 
F7324&ERC 
9360C 
95 83C 
04 6PC. 
N463C 
A420C 
N4862C 
0463C 
462960 
45917 
1486 

9435C 
0001 

1495 


°$910C 


“ 


MQPrFoOoWIIoeosagINwVIIB TV IIO V9BVMVSB FO - Ve VFrIOIFONIDAAIAHKW VIANA" Bsr 3B SGN DIF IAVIOWV 


o9go279D 9090 090 00 9909 9990 BOND SDGOIN0C NSO SO 9990 E290 D9 IOD990 9909 SsT9O ONO OOS5D 


A/S 


A000 
95460. 


RRAOC S& 
nna : 


OoOOsC 
NC4A1LC 


ACO ? 
NOA1LTC § 
NHoOLe 


4635C 
8950C 
0260C 
O3A0C 
036&C 
0373C 
O391C 
045RC 
03660 
&4440C 
062190C 
O210F 
912CC 
045460. 
4&680C 
6377¢ 
18220 

R370 
0464C 
N464C 
0460C 
0660CF 
7790C 
7795C 
73990C¢ 
7995C 


7OLOC | 


6470C 
64750. 
75500 
7555C 
95281. 
SSRiC 
9360 
7851C 
6480C 
4485C 
4490F 
6640C 
6645C 
64346C 
6530C 
9000 


0005 
N280 
1820 


M 


9 
5 
& 
3 
5 
& 
3 
5 
5 
1 

3 
6 
4 
4 
& 
a 
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2 
4 
4 
nN 
5 
4 
5 
1 

) 
5 
4 
& 
& 
& 
1 

1 

1 
1 
é 
1 

1 

1 
1 

& 
& 
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& 
1 

1 
46 
1 
1 

4 
5 
a) 


oe] 


( 


SYSTEM WITH CHRONK AICAL XMISSION 


I LINE 
) 1299 AC DINIT(2) 
0 1eP 91 C LABEL es RRML ID 
0 1292 BC PRESET(2)24SK4IT(5) 
9 1293 DINIT WwW CARRET(O}21(3) 
9 1294 Ww ATTON5(0),5(5) 
0 1295 R FILCONI(Q)s61(5) 
‘@) 1294 Ww CARRET(IO)41(3) 
0 17°97 W FILCON(0)s6115) 
4 1?98 R ANS(0)21(5) 
9 1299 C ANS,LETRY 
0 1300 BC DINIT(1)2D0INIT(3) 
ra) 1301 MC ANMADs CURPIC . 
9 1392 A TWN, CURPIC 
0 1303 MC CURPIC+2(4)sNXPICe2 
9 1394 MC FIRADe NXSND 
0 1305 S$ DL2,L1 
0 1306 FN ONE (1) 00 AYNRS(2) 
0 1307 MC DAYNRS (2 do NXPIC 
a] 1308 BC DWNNUP 41 (6)2 UPNOWN(5) 
0 1309 MC TAGADRsADOR 
9 1310 w YAGS(0)sADDR(0) 
0 1311 BC ¥e10(2).4010(5) 
q 131? MC FIRADs NXTASD 
0 1313 BC CLOSNT+1 (6), INCLOS(S5) 
0 1314 MO SIXsePSFLAG 
Q 1315 MC DINY(10),00UTY 
0 1316 PRESET &8C GETSY941(6)sGETSYS(S) 
0 1317 FN ACLNT#2(2) 2ACNSL (4) 
0 1318 S ONE» 4Ci¥St 
Q 1319 FN ACLNT#2(2) 9 ACNML (4) 
0 1320 A ONEs SCNMI. 
0 1321 MN ACNSL42(1)2COMP 
ra) 1322 MN ACNSL®3(1)sCOMP+S5 
0 1323 MN ACLNT+2(1)2MOVER 
0 1324 MN ACLNT4#3(1) s“O0VER 45 
0 1325 Mw MGVER (6) oMVIAC 
0 1326 MN ACNMi¢2(1)2ACMV 
0 1327 MN ACNML4#3(12),4CMV45 
0 1328, MN ACNSLe2(1) oe RNAODRI 
0 1329 MN ACNSL4#3(1) 22NADR1¢5 
2) 1330 MC ACNSiLsCALCLN 
0 1331 S TENsCALCLN 
0 1332 BC #420(t 2442012) 
0 1333 A CALCLNS€2(2) 2 RNADR1I01(4) 
‘e] 1334 MN ACNML42(1)sGRA9A8S 
0 1335 MN ACNML #3(1)2GRABAS45 
0 1336 MN GRABAS (6). GRBAC 
0 1337 MN ACNML#2(1)28A0AC 
0 1238 MN ACNNL #301) 2s SADACO§ 
Q 1339 MN BUFFANsTESTAD 
0 1340 BC ADJUST 41(6)sADORES (5) 
Q 1341 BC NORMLO(S5) 

1342 ORG #5 

1343 OINTL OM CS'DINTL® 
0 1344 KR OX BC NEVNR(I7JF)sENTER(O) 
0 1345 O10Y 


MC DITY(10)s0UTY 


o 
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THAGE 


INITIALIZE ROUTINE 
NORMAL PROGRAM LOAD? 
GO Ta SET INSTR'S ELSE 
CARRIAGE RETURN 
REQUEST INITIALIZATION OATA 
REA!) SYSTEM PARAMETERS 
CARKIAGE RETURN 

WRITE SYSTEM PARAMETERS 

WAIT FOR ACKNOWLEDGEMENT 
ENTER «Ve FOR GKAY DATA 

BAD ENTRY» RETURN 

SET CURRENT PICTURE ANNPFSS 
INCREMENT PAST SYSSS 

SET NEXT PICTURE ANDRESS 

SET NEXT SFND ADDRESS 

MOOIFY OL1 FOR CALCULATIONS 
CREATE THE FIRST DAY INDICATOR 
MOVE DAY TO NXPIC 

CALCULATE DYNAMIC LIMITS 

SET A. ORESS FOR SYSSS TAGS 
WRITE LARELS ON DISC 
CONTINUE YF GOOD 
SET UP NEXT ADDRESS 
BLANK TRHZAD TABLES 
SIMULATE OPTION SIX TO CLEAR FILE 
SET OUTY INSTRUCTION FOR YATL ZN 
LOAD MOST CURRENT SYSSS IPTC CCRE 
SET LENGTHS IN COMPARE AND FMAVES 
ACHSL s ACLNT e@ ji 

ACCT NUMBER MOVE LENGTH ITS ONE 
GREATER THAN ACLNT 

SET oF COmP 

SET OF COMP 

SEY Atl (1F MOVER 

SET NF MOVER 

SET AND &M OF MVIAC. 

SET OF aCrv 

SET ACMV 

SET RNADRI 

SET RNADRI 

SET FOR CALCULATIOM 

FIND “072 OF CHARe OVER TEN 

SKIP ADJUSTMENT IF LESS THAN TEN 
ADJUST RANDOMIZER FOR 1 OWeNRNFR 
SET AM AF GRASAS 

SET BM OF GRAHAS 

SET At af:'0 BM OF GRBAC 

SET ERROR ROUTINE LENGTH 

SET ERROR ROUTINE LENGTH 

SkT COMMNN ADDRESS FOR ROUTINE INT 
GO TO SEY ADDRESSES FOR ACCESS 
COMPLETE wITH NORMAL LOAN 

USE A‘IY tINUSED SPACE 

INITIALIZE DISC COMMAND 

NORMAL ROX INSTRUCTION 

DUTY INST FOR INITIALIZATION 


ASK AGAIN 


™ 


hy, 
ot 


eF 


ade! 


MAT rN ASSEMBIER TY 


LOCN 


946CC 
9599¢ 
956CC 


~ 956406 


95716 
95746C 
9521C 
S5a5C 
$527C 
961iAC 


INSTR/DATS OP 


CURE NXPT 

LOVFL NXLN 

c09101 

NRHA 

ATTNS 

ATTAS 

8000 

MM 

SINGFReFRT 
CROAA 


A/R 


qgnod1 
N091 
N001 
nn01 
ono1 
n001 
nn001 
ono0t 
0n01 
oT ezep| 


B/S 


0049 
onst 
0006 
9005 
0005 
9005 
0004 
n002 
0025 
0017 


CRNGO2 = MOTS SYSTEM WITH CHRO 


LINE 


1346 
1347 
1348 
1349 
1350 
1351 
1352 
1353 
1354 
1355 
1356 
1357 
1358 


ne : 


n™ 
D4 
OM 
Dw 
D™M 
OM 
OM 
DM 
Om 
DM 


SICAL XMISSION 10/11/71 PAGE 0025 


IMAGE 


C'CURPC NXPIC QNXSND FIRAD FIZLM FIN2RSPRIME STADR °* 
C'LOVFL NXLNK BOLNK NXT8D LOTACL CYNL1 DYNL2 CICNT HY? 


c'oooe1o0i1! TAG SECTCR CONSTANT 

CS'*NRMLD! NOR WAL LGAD COMMAND 

Carros! REQUEST ACTIVITY LABEL 
C'ATTOS!? ENTER OISC INITIALIZATION PARA 
c*'oo0oo! CALCULATE 'QVER@=TEN! AREA 

cram t TWO CARRIAGE RETURNS CONSTANT 
C'SINGER@=FRIDEN MDTS SYSTEM! PROGRAM TITLE 

ct CRO602"71284! PROGRAM MODULE AND DATE 


* END OF COMMON ROUTINES 


SYS Tug 


SEN. 


2722 
2724 
2724 
2728 
2730 
273? 
2734 
27346 
27328 
2749 
274? 
2744 
2746 
274R 
2750 
2752 
2754 
2756 
2758 
2760 
276? 
2764 
2766 
2768 
2770 
277) 
2774 
2776 
27738 
2780 
2783? 
PTR4& 
2784 
27RR 
27356 
2732 
2794 
2796 
2792 
e208 


ERO 


2804 
2RO4 
2598 
2819 
2R1?P 
2844 
PR1L6 
PRR 
PRIN 
L2R2 
2RPY 


> PRPH 


23APR 
283% 
283P 


ya 


{ 


LOC 
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VowVQR4KEP 
P149YV18N?X% 
OLINGANON! 
QOAVPEN1AN 
P31xXV4e545N 
P3IRTIUS55 84 


PLAGVaNNOAS. 


VOPSARKAEP 
R17APRKITAN 
Q1iGIPNIRAN 
YOSPOANAANAN 


PRINT 
ATT12 All 


CRNBOP = MNTS 


A/R 


1440 
NO4&R 
1370 
0159 
1460 
ON4R 
0165 
0910 
0326C 
0165 
49119 
AN&sS 
1430 
1505 
nag 


0146 
1830 
1499C 
0152 
0146 
0146 
1580 
N326C 
aS OSC 
0152 
A152 
NA4S 
1119 
0045 
&S505C 
4505C 
n910 


RL01C. 
n260C. 
PRP OC 
PR 75C 
S561C6 
4761 
1499C¢ 
1119 
A360C 
31866 
AR4S5C 
1499C 
M036 
1760C¢ 
1910C 
9300 
1835 
OnN01 
NNO1L 


ae e ODVIOIDI—-"DIV-NWOVSIO 
ocoroosca00n090 99009 


MeNwWDADOIOIODIVIINRANADIBIODD 
o73J 90 3990 9 530 99 0 0 908 


M 


RKovo2owdrFwvdrdrowon 


I 


O72 99 00 0090 9290902 


8270C 
A310C 
8451C 
SA5LC 
S440C 
4640C 
4N285C 
NCO! 
oh metal 
BS45iC 
SS51C 
0035 
§$990C 
1741C 
1R20 
onnng 


0005 
0030 


INWPKHKH AA PKIWNS- 3D 


Nnwor- KN ~ ANVUANN UI 


oeoo0oo0oo0o9dg 00 gs9000 000 052 
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oo Mie Ba) ia ie ie ie ie elke Re) 


9009, 000 0g 00 oO Z0 000 


LINE 


1528 
i529 
1530 
16931 
1532 
1533 
1534 
1635 
15364 
1&37 


1538 


1539 
1540 
1541 
1942 
1543 
1544 
1545 
1546 
1547 
1548 
1549 
1550 
1551 
1852 
1553 
1554 
1555 
1556 
1557 
1558 
1559 
1540 
1561 
1562 
1563 
1564 
1565 
1566 
1567 
1568 
1549 
1570 
1571 
1672 
1573 
1574 
1575 


.1576 


1577 
1578 
1579 
1580 
1581 
1882 
1583 


ALOK1 C 
BC 
InKe A 
INK3 Cc 
BC 
GOTCHA MC 
MC 
W 
PRNLN WwW 
- BC 
TRACE OD 
* 
DUOMP R 


“NICAL XMISSION 


InNK3(5) 

XATA#3¢1)2 THREE 
INK] (3)sBL0K1(5) 
TRMNL (3) 9X ATA 
GOTCHAI2Z)» TNK2(5) 
XATA*3(1)s TRCST(6) 
TRCST(6)s TREND 
FINT(3)4TRCRD(5S) 
FREE CL Is XATAlS2) 
TFECST(6) sXATA41( 92) 
CARRET(O)91(3) 
xATA(Q)}9107(5) 
INK2(5) 

GRG #5 

C' TRACE! 


19711771 PAGE 0029 


I 4AGE 


TRY NEXT SECTOR IF NOT AT FND 
HOW AANUT THREE BLOCKS? 
NOT A BLOCK TF HIGH 

IS THIS GNE OF THEM? 
PRINT IF MATCH 
INCRENENT RY BLOCKS 

UP TO LIMIT YET? 

GO OUT IF PAST LIMIT 
FORMAT PRINT LINE 
REPORT ANORESS 

CARRIAGE RETURN 

PRINT LINE 

INCREMENT BY BLOCKS 


TRACE VERB 


DISC UTILITY NUMP 


CAT(O)s12(1) 


FC *+41012),0UMMY(5) 


MC 
FN 
FN 


ZEROS(1)sTAPIR 
C0G(7)201(07) 
CaT(7)s03(7) 


C CaT(12)s03 


BC 
MC 


LION 
HIPPOL 
HIPPO2 


exer ® 


NORMLD BC 


DUTY MC 


PRINT ODI 


*™410(2),DUMMY(5) 
FREE »sCATeol 
ONE s RHINO 

O9G, HIPPO! 
COGs*IPPO2 
XATA(O)sCAT(O) 
CARRET(0)01(3) 
xATA(0)2107(5) 
ONES CAT 
ONEsRHINO 
FINI(1L sl TONS) 


THIS IS THE BEGINNING 


REA) DUMP PARAMETERS 

REPORT AK ERROR IF CONSOL fC RAD 
SETUP A ZERO 

PASS -ON ONLY MLIMERTICS 

PaSS ON CNLY NUMERICS 

WERE NUMBERS REALLY ENTERFD 

YES» TN NEXTe NOs TO DUMMY 

Put SPACE IN PRINT LIWE 
DECREMENYT COUNT BY ONE 

MOVE DEVICE CODE To WRITe CONTROL 
MOVE DEVICE CODE TO WRITE NATA 
REA. JISC (NO STATUS CHECK) 
CARRT AGE RETURN JF aPPLICARLFE 
WRITE DATA AND ACORESS 


INCREMENT ADDRESS 


DECRENENT COUNT 
TO FINI IF FINISHED 


OF THE NORMAL LOAD PROCEOURE 


ENTERED ON INITIALIZATION AND SYSUP 


GETSYON+41(6)s,GETSYS(5) 
CURPICeADDR 
ATADsPICROel1 
ATBD»sPICR2¢1 
CLAC41(6),GETPIC(S) 
CLOSNT*1(6)sCLOSIN(S) 
ZFROS(1) sRLOKAC 
CARRET(O)51(3) | 
SYSSS(U) 219015) 
ATATsPICROe1L 
ATBTs»PICRE+1 
ZEROS(5) sNEED 
MEEN+1¢(6),RESET(S) 
CLOFI(.G(20),CLOSED 
DITY(10) ,0uTY 
ROX(5) 3 

ye5 

C5' PRINT! 


GET CURRENT SYSSS FOR THIS NISC 
SET COMMON ADDRESS TO CURPYIC 

SET AND OF GET PIC RCGLUTINE 

SET AM OF SECOND READ IN GETPIC 
GET CURRENT PICTURE 

FORCE A KRORMAL CLOSE ON IT 
UNBLOCK ALL ACTION 

CARRIAGE RETURN 

WRITE SYSTEM STATUS SECTOR 

SET WRITE INSTRUCTION IN 

GETPIC ROUTINE 

INITIALIZE LINK AVORESS ARFA 

GO TO CLEAR AND RESET POTNTERS ETC 
MAKE SHAREO ROUTINES AVAILABLE 
AFTER DINTLs MOVE SPACF TO PSFIAG 
DOMINUS VOBISCUM 


MSGXX1 DM CHATT12 ALL TERMINALS NOT CLOSED! 


-€1CAL XMISSION 10/11/71 PAGE 0030. 


2 ey ASGENBIFR TT CROKN2 = MDTS SYSTEM WITH CHRONO’ 
SEQ. LOCN INSTR/NATA OP AvR MT B/S MI LINE IMAGE 
ci 3170 1870 REPLY YES 0001 0n31 1584 MSGXX2 DM CYREPLY YES TO OVERRIDE OR NO = ! 
3172 1901 YES 0001 0003 4885 YES OM CryYEes? AFFIRAATIVE CONSTANT 
| 3174 1586 | 
3174 1587 * THE FOLLOWING TWO LINES ARE USED FOR SEPARATION BETWEEN SECTIONS® 
3178 1904 co00 «4588 ORS 0000 
oe 3180 O0COO E&AewenNN 0007 0009 1589 OM 7€9'854==2000! 
fie 318? 0063 00CO 1590 ORS 00 
3184 i89i *« 
es 
~ 
& 


rT a eo 


pe. 
Facey 


Sag 


ed 


so 


‘es 


SYSTEK 


SEQe 


3188 
3:99 
3192 
3194 
3196 
3198 
3206 
3290 
3204 
3206 
Ses 
2°19 
3°12 
Sets 
2716 
3P1R 
3720 
3°? 2 
32° 
32°? 6 
3278 
3238 
3°32 
3234 
3236 
323% 
3249 
3°42 
3244 
3°44H 
3246R 
32459 
3°52 
3?54 
37°56 
3252 
37606 


226?) 


3264 
3264 
3268 
3275) 
3°72 
3774 
32746 
3A72 
378% 


JPR 


3284 
3284 
3PRR 
3290 
3290 
3294 
3°94 
3298 


LOCN 


O05 
0000 


2010 | 


Oni! 
OC 
0n15 
Q0014 
0020 
0021 
0025 
0031 


0935 
0085 
0047 
0049 
0059 
9659 
N084 
9053 
GEGR 


0055 
0149 
0155 
0148 
0169 
01Re 
0182 
019A 


0198 


o1an 
$110 
OLPC 
0130 
0149 
0150 
21640 
9179 
0120 


N ASSFMALFR TT 


INSTR/DATA 


OQIPNANNAN 


0900 
176A 


0000 


o0nn 


ST STUB NNAS 
POSNIS&ND 21 
QNOVIACANAAN 
ePQITRENNIA 
HFPTALORGA 
YPPTSE&ANREs 
P149Y5N0N35 
USXxPANANN 


OP 


11 


ng 
OR 

-O8 
7. 
a7 
07 
AR 
11 


( 


CROB02 © MDTS SYSTEM WITH CHRONOLE AL XMISSION 10/11/71 PaGE 0031 
AJR MI B/S MI LINE IMAGE 
1593 * 
1594 » BEGIN TERMINAL PARTITIONS PROGRAM 
1595 « 
1596 #* 
1597 »* THIS IS THE TERMINAL PARTITIONe IT IS DESIGNED TO 
1598 ¥#* ACCEPT TRANSMISSIONS FROM THE MDOTS TERMINALS ANDO PASS 
1599 + CONTROL TO VARIOUS ROUTINES» IT ALSO SERVICES TRANSACTIONS 
1600 «# IN THE CORE QUEVE AND SERVICES THE SCA PARTITION!S 
1601 # COMMUNICATIONS REQUIREMENTS IF APPLICABLE. 
164602 -« 
OnU00 1603 0G 9) 
9100 § 0 0090 0900 1604 BC HAK(S) BRANCH TO INITIATING ROUTINE 
NoO11 1605 ORG OO11 
900 0004 1606 Xi D™ OC4% INOEX REGISTER 1 LABEL 
0NC1 0004 1607 REG DM Cc4'0900: 
0016 a 16G8 ORG 0016 
N001 0004 1609 CHEAT OM A'tCLOSED? PARTITION FLAG IN CLOSED 
nn23 | 1610 ORG 0021 
0001 ~0004 4611 REG2 OM c4'0000! 
0031 1612 ORG 9031 
N001 0004 1613 REG3 OM c4'0000! . 
1614 » THE CONSTANT FIELO ‘NEED? 1S DEFINED IN THE SCA 
1615 ¥ PARTITION HOWEVER IT IS ADDRESSED ANO USFNA FOR ALL 
16416 * PARTITIONS. 
1617 »* O84 35 USE THIS AREA IN ALL PARTITIONS 
1618 sNEEDO OM C5 HOLD AREA FOR COMMON RETURN ADDRES 
N045 1619 ORG 004s 
9001 nn02 1620 CL 0™ c'00! 
NoO01 0002 1621 CHANX OM C2 PARTITION NUMBER SET BY CHLOE 
NN01 n001 1622 DEVICE OM cCror 
9°50 16?3 ORG 00580 
0001 0004 162% WwORK3 DM C0000! 
0053 | 1625 ORG sel 
0001 0245 16426 INBUF OM C245(1) TERMINAL INPUT BUFFER 
nn55 1627 GRG 55 
1428 »* 
o001 Ang9s 1629 DATA DOM C94 DISK I/0 BUFFER 
O001 ON06 1630 LNKAD OM C6 LINK ANNRESS-eMUST FOLLOW DATA 
ono! 0013 1631 racc DM C13 INPUT ACCOUNT NUMBER 
n001 ANO1 1632 aACTNC OD” C1 ACTION CONE 
O001 0013 1633 TaCC Or C13 TEST ACCOUNT NUMBER 
0200 0016 1634 OVNO DM 0C16 RANDUMIZ7E ADDRESS wORK ARFA 
0001 0010 1435 gud DM ¢€10 RANDOMIZE ANCRESS WORK AREA 
001 N06 1636 REM OM. C6 RANOOMIZE ADORFESS WORK AREA 
1637 * 
0100 1438 ORG 0150 INITIATING ROUTINE 
146439 # 
&215C 41 GPR 40 1640 MAK A KON101(4)29025(4) CORRECT BASE TO PARTITION RELATIVE 
0035 AN GO31 4&0 1641 MC 0035(4)sRE53 LNAD INDEX REGISTER 3 
0170 #10 A000 00 1642 MC OUML(10)s00090 PROPER INSTR TO LOC 0000 
N045 49 NO16 4 O 1643 S 45P(4)sCHEAT(4) ANUUST CREAT TO THIS PTN 
0045 4&0 R96 4 O 1644 S 45P(4),0PNOIS¢6( 4) APUUST OPNDIS INST TC PTN 
0045 4&0 ORS6 4&0 1645 S$ 65P(4)sCLONIS+6( 4) ADJUST CLONIS INST TO PTN 
149909 4 0035 5 0 1646 MC ZFROS(5) sNEED INITIALIZE LINK ADORESS ARFA 
5R3880C 5 0 9000 nO 1647 OUML BC TATTLE(5S) RECOVERY INSTRUCTION, MDTS 
0176 1648 ORG #04 


oe ee Trey 


Lory 


Q1768 


GLARE 
G3 
8319 
G3A5 
0335 
O349 
0350 
N349 
0370 


Q3R9 
0390 
O4ann 
0410 
O4en 
043C¢ 
0440 
045N 
0460 
0470 
O04%8N 
0490 
C50% 
0510 
0529 
05°39 
0545 
0550 
0540 
057C¢ 
C5RA 
950 
O609 
946460 
CAPD 
C0634 
N69 
0650 
9666 
0679 
N4R0 
0490 
s70cr 
0710 
07209 
0730 
0740 
0756 
0760 
0770 
C70 


0750 
NBA 


PTOAY1T149Y 
RO SANARNANAN 
NOP TOGARARD 
WE APRIIAQ 
ROSUNMAHRI94P 
PONT AKNIAG 
P&SNVI7AN 
ULKAPANAAN 


NOIANSASNA 4G 
PO THQNYNK PY 
Q79RYAANDAS 
LIN KRALCACLA 
P35AV4ENNSO 
POORS4 74414 
4PIRB ANKE 
TT FE WaNNSN 
POI5N4aNNG1 
POARNA PAA 
LTTABMK4NASDA 
PSIANGANIALY 
SPIYENSNABY 
POAINWMIACEA 
POPSaetvanv 
aa KAS ANAL 
PPOSKS151 111 
RERXPAIAAR 
PL ARUIPNANE 
SOTPAAALAN 
PPS7R1I14AY 
RA VErARARCL 
P14S9YV4NN1 4 


 PYT7YCO“narn 


PATE TOEAIAN 
ST ettenny4 
STTFUSLITIN 
LTSOUATTREIN 
JYITENANNS 
saveanannann 
ASIAV3AGN 
SOcPnenRpn 
PY AKAAGKNAAR 
SOxXxRANNDNANA 
290 3PR4179°R 
UN KR NCAAAN 
PATB540011 
PHAPYIARIO 
PLaYYTI7PU 
QIVOTAI7OUY 
JORSPAIBAP AP 


PORNAT17 44 
WERSPNNANA 


Lm | 


11 


CROANP @ FONTS 


ANG4 


9300 
AD28C 
A320 
2049 
1760C 
0250 
N16 
&505C 
1R210C 


0953 
C&D 
FOPISC 
OREO 
S35G6BAC 
n0e5 
HN01C 
45070 
coso 
0050 
&#638C 
41050, 
nc50 
na07¢ 
aA54 
O3190 
AA56 
40 80C 
1785C 
N&00 
G3A72eC 
CbAGS 
1499¢ 
1791C 
N067 
46050. 


&b4O5C 


48 05C 
4405C. 
CALO 
5116C 
90700 
1791C 
AR 2O 
ORPPL 
AR eON 
0N45 
4a509C 
1499C 
17067 
6230C 


ORO6 
47? 30C 


~ayroodnND-DvVIWWAwWwWDDZDVIOWIDIVIOVIAOSFDSK"§DIA~M~F OD WMINAOIOVSI 


Moovvuntvsds 


oo 30900 395 
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coooog 90099 00 00 00429 9909 SC2Kr OVP 990 5S999FR00GB B35 9900 


RIS 


ANNs 


1499C 
G399 
03 8&0 
17461CE 
1940C 
9366 
1741C 
0000 


0245 
OR PO 
erekek 
£000 
CN50 
NK&A4 
anso 
COSC 
A011 
2725C 
o0c50 
N3206C 
Q306C 
no50 
6906C¢ 
acnn 
§115C 
4900 
020NC 
canon 
1499C 
G4cen 
0011 
ChP6 
O201€c 
A011 
1791C¢ 
1785C 
9051 
erensle 
COO01 
CREO 
O202C 
N000 
1791¢ 
an90 
ON114 
OR10 
1795C 
1705C 
6230 


1747C 
0000 


1 
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ee 
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wonrewre 
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SYSTEM WITH CHRON 
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oO ROM ml? 2 te oe re 6 ire te Ie ie ke ho Re iw ia Heke Ke Re eke He He eke l= Re Ke Nee ire te re oe ie me) 


oOo 


LINE 


16449 
1450 
1651 
1652 
1653 
1454 
16595 
1456 
1657 
1458 
1659 
1640 
1661 
1662 
1463 
1664 
14658 
1646 
1647 
1668 
1469 
14670 
1671 
1672 
16473 
1674 
1675 
1676 
1677 
1678 
1679 
1680 
1681 
1682 
1683 
1684 
“16@R5 
1484 
LAR7 
1488 
1689 
1490 
"1691 
1692 
"1693 
1494 
1695 
1696 
14,97 
1498 
1499 
1790 
1701 
1702 
1703 
1704 


STR 


RHUMBA 


x READ 
READ 


TaGe 
TAGS 


TAGS 


TROK 


TARS 
TAB 


0°41 


ORG 


C 


BC 


3GTCAL XMISSION 


A'REX! 


399 
BLOK ACs ZEROS 
®41N(PsSTR(8) 
DEVICE (7),9F A011) 
CLOFLG(20) sCLOSED 
*4¢10(P )ZRETRY( 5) 
CHE ATs RHUMHNAS6 
ONE», CL.ISEN 
SFvND1(5) 


MOTS ON SERVICE REQUEST 


R 
BC 
W 
BC 
MC 
MN 


TN3GF (009) 22451529) 
TAG3R(2),REX(4) 
NAK(090)0113900) 
REX(5) 

KON245 (4,9), WORK 3( 50) 
00°25 (410 TAG44i1 

RAS1 (4) »pWORKS( 4) 
TRREE (120) eWORKZ(420) 
WORK3(490)011(00) 
vORK3( 400) 0a 0NRKS( 20) 
SF VEN( 1) 2WORK3(4) 
KO"199( 4,0) sWORKA (50) 
WORK 3( 400) 2WORKA(4sG) 
WORK AGL (199) 2WIRK3I(,0) 
INBUFS1(201)2ETH(29) 
TARA(2)29(0) 
INSUF OL I ts 1) sE TX 
TAR2(2)9 TAZP(S) 
NUMBO(2)20Q0LTM 
TAGA1(3I4N(9) 
GRLOCKsZERSS 
™4¥10(2346TAG2(9) 
ZE%OS( 49) 211699) 
INPP4£( 4,9) 2TAB4H(49) 
Cre AMX(1U0N81)29A95710 20) 
KON1IC0(30019111420) 
KONLIOG( 3920), INOPA( 4,0) 
ORE (120) aNIMBQG (220) 
KON100(340)5WNRK341(350) 
TARG4(33990(90) 
ACK (020)01(320) 
¥#10(2)e2REX(5) - 
INPFAC GSO) sINPXA(2 9) 
ReEX(1)2019) 
IKPPAS1 400) 9 INPPA( 90) 
REX(5120(0) 
CLhL(4s0)sREG1I (00) 

FIVE (1)2 TARA 
ZFEROS(120),TABS( 41) 
TASA20)2TABB 
VALO(L Isa VALN(3) 


MAY INSERT 8C CLOSOT*1(46)s CLUS 


LETRB,EOND 
VALO(5) 


19711771 


IMAGE 


PAGE 0032 *% 


CREATE ANDRESS OF FIRST INSTR 


HOLD TERMINAL PARTITION 
LOOP SACK AND SwITCr 
SERVICE REQUEST 

SHARED ROUTINES AVAILABLE 
G) BACK IF NOT 

AQOSUST CLOSEC TO THIS PYN 
CLAIM SHAREO ROUTINES 
QUEYE SEND TO OISC 


REAU TERMINAL NON FILL 
YIMe WT ON FAULT 

WRITE NAK BACK TQ TERMINAL 
SWITCH PARTITIONS aT wEX 
LIMIT CONSTANT 24665 TO wORKS 
PLANT RES COUNT PUINTER IN 
CALC “MESSAGE LENGTH 


NEXT IN 


IST ANN LAST CHR NOT COUNTED 
CHARACTER COUNT TO Ki AS PTR 


SAVE "1ESESAGE LENGTH 
ADJUST LENGTH FOR PREFIX 


T0 GENERATE A HUNDREDS NIGTT 
IST POSITION OF WORKA =s KUNDRI 


BLOCK CTR TO 1ST POSITION 
ETS IS NORMAL ENDING 

GJ TO FLAG TERMINAL OPEN 
COMPARE FOR RIX 

GO f0O FLAG TERMINAL CLOSED 
CHECK FOR ROOM IN QUEUE 
QuFVE YS FuLi IF HIGH 

IS THE QUEVE ALCCKED 

NAK LF IT IS 

X1 #ILL FE SOURCE POINTER 
InPuT PTR ADOR TO TRANS INS 
TRaiiSFER 100 CHRS STARTING 
AXVANCE BUFFER POINTE? 
ADVANCE GUEUE POINTER 
INCREMENT BLOCK COUNTER 
MESSAGE LENGTH REMAINING 
LONP AND TRANSFER 

1 CHR REPLY IN CGNTROL MODE 
LEAVE PARTITION AT REX 

IS JeLUe POI: TER AY LIMIT 
ST’IeL. OK EXIT 

ROScY TO BEGINNING 

Gi) SwITCH PARTITIONS 

CHAWX TO REGISTER i 

ALI. OW KEC:PEN 

"CLOSE OPEN PARTITIO‘ 

Ait P&RTITIONS CLOSED? 
VALIDATE TRANS JF MCT 

(8) 

ALL TERMINALS CLOSED 
VALIDATE DATA 


Tr 
AY CHA 


LOCA 
O510 
O898 
C806 


OR 10 


9870 


02730 
0840 
DR 50 
O3AN 
0870 
9825 
0890 
C906 
2940 
09°0 
3920 
0940 


0950 
co00 


TFN ASGFe Rt Fw 


INSTR/NATA 


0 
1 


U6 TPREI RP 
xosPanananna 


PDVAPNIT74N 


ROXKLIORARAN 


PaRWNIV17AN 
PONK911TSY 
P&O2uTiT Te 
V7ISQR7AAP 
P14QY147AN 
Pi TIAYRATTeP 
ROYRONGHAND 
PLGSNANULIX 
AS: swanacre 
uOoxRnnANnAN 


&AAw ee ANN 


ims 


11 
11 


14 
11 
OR 
NR 
O8 
41 
O8 
14 
11 
0& 
01 


11 
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0009 
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SYSTEM WITH CHRONOLOGICAL XMISSION 


I 


oe | 


Po 00 W000 9WW9095 


LINE 


1795 
17C6 
1707 
1708 
17¢9 
1710 
1711 
1712 
1713 
1714 
1715 
1716 
1717 
1718 
1719 
1720 
1721 
1722 
1723 
1724 
1725 
1726 
1727 
1728 
1729 


LETRA 
LETRB 
» 
TARA 
REX 

*% 


* FORMAT CREDITe INQUIRIES 


” 
CTIN 


CLOOIS 


OPNOIS 


CTINZ 


a 


* THE FOLLOWING TWN LINES ARE USED FOR SEPARATION GE 


NRA weS 
o4 cro 
DM crit 
SwITCH SPANCH TO OPEN PARTITION 


Rl TRPEN(5)sTA21(§5) 
EC SIR( 812010) 


CLOFLG(20) »CLOSED 
e+10(2I2CTINI8B) 


ONE» CLOSED 


DEVICE (1,0), CREDT( 23) 
STAR sCREDT 41 (4 3) 

ROUT 41(6)sCIREP(5) 
ZERNS(1),CLOSEN 
CREDOT(1s3) sCREOT +1 (43) 
CTIN3(2) 0TAG2(5S) 
CREDT#2(1903) 2ACKQ+1 
ACK9(020)22(350) 


REX(5) 


ORG 0 


O* 


7C9'8&be"2000! 


IMAGE 
TERMINAL ACTIVE FLAG 
TERAITTIALS CLOSED FLAG 


TO INDICATE PARTITON OPEN 
SaITCH PARTITIONS 


AND REPLY TO TERMINAL 


SHAKEN) RCUTINES AVAILABLE 
WAIT AT CTIN IF NOT 

CLAIM SHAPED ROUTINES 

Pur OFVICE INTO CREDT TABLE 
ERASE PREVIOUS TERM I 
CHECK FILE FOR NUMBER SENT 
RELEASE SHAREN ROUTINES 
INQUIRER STILL HEFF 

REPLY IF EQUAL ELSE IGNORE IT 
RESPONSE TO MOTS REPLY 

2 CHR REPLY IN CONTROL MOOF 
SWITCH PARTITIONS AT REX 


TWEEN SECTIANGe 


a 
7 


cage 


a Deas 


LOCA 


00463 


JoaG 
9910 
0011 
0915 
909016 
0920 
9A 1 
0928 
0031 
0035 
C038 
O0C4&) 


0050 
O06C 
NO70 
OGRC 
9090 
ag1ac 
0110 


0120 
O1LI3IG 
OL4er 
0150 
OLAC 
OL76 
0180 
N190 
0206 
0194 
0197 


ASGFPBIFR TY 


INSTR sNATA AP 


YAISKOROEDA 


0aann 


1766 


D990 


POXPONRACHA 
PTOPK11&89YV 
AO PWK¥OROAKRY 
PITSI7wi &Q7v 
RORONRAGAL 
ANTVYANNI AD 
KxnNeFVvALCNHALN 


WP 21T0G1 TAS 
V1iwsxKABRt 760 
PRIOTBAAAEN 
RORENENI AN 
VOEPSBERQRP 
P1sIAAAHnQAr. 
PPPTMANIAS 
UPaVYANONAGA 


vor 


il 


04 
14% 
14 
14& 
13) 
11 
11 


NR 
11 
14 
11 
11 
Cf 
OR 
11 


CROF02 = MOTS SYSTEM WITH CRRONE 


A/R 


0000 


P370 
AOL 
0001 
0016 
N001 
nn21 
Orot 
0931 
0001 
0n35 
M001 
0050 


eT exere) 
&O28C 
Af 80 
377 
2100 
0196 
nN60 


P?210 
1786 
PP 74% 
9200 
OC36 
1435 
PAP74 
1790 
0196 
N001 
0001 


M 


I 


§ 0 0000 


MmnNNONVNODNV 


mMmowevoan~ 


90000057 


oOoc o90 32092 


0004 
0004 
0004 
0004 


0065 


M 


8) 


9292 nMmr~ xX WwW 


No 


72 rsyamnonsp 
900 909 090 2 


I 


| 


VOO0O0 090 5S 


LINE 


1731 
1732 
1733 
1734 
1735 
1736 
1737 
1738 
1739 
1740 
1741 
1742 
1743 
1744 
1745 
1746 
1747 
1748 
1749 
1750 
1751 
1752 
1753 
1754 
1755 
1756 
1757 
1758 
1759 
1760 
1761 
1762 
17€3 
1764 
1765 
1766 
1767 
1768 
1769 
1770 
1771 
1772 
1773 
1774 
1775 
1776 
1777 
1778 
1779 
1780 
17814 
1782 
1783 
1784 
1785 
1786 


( 


SSTCAL XMISSION 10/11/71 PAGE C034 


IMAGE 
a 
* REGIN SCA PARTITION 
* 
* TRYS IS THE COMMUNICATIONS PARTITIONe IT ACCEPTS COMMANDS 
¥ FROM THE HOST COMPUTER AND PASSES THEN TO THE TERMINAL 
a PARTITIONS FOR COMPLETIONe 
¥ 
ORG 0000 
s 
4 AFTER INITIALIZATIONs THE FCLLOWIKG INSTRUCTION BRANCKES 
* TO THE TATTLE ROUTINE WITH THE ADORESS OF SaSuP LOCATFO 
% AT POSITION 0006.6 
s AC TATTLE (S) RECOVERY INSTRUCTION 
* 
RC MAKS(5) BRANCH TO INITIALIZING ROUTINE 
ORG 0011 
IR1i 04 C4#!o0000! 
ORG 0016 
CHIET 0M A'CLOSED!? PARTITION POS IN CLOSED TARLFE 
ORG 2l 
IR2 OM c4'oo0ddt : 
ORG 31 
Ir3 DM C4% INDEX REGISTER THREE 
ORG 35 USE THIS AREA IN ALL PARTITIONS 
MEED DM C5 HOLO AREA FOR COMMON RETURN ACDRES 
ORG 0050 
* 
* THIS SCA PARTITION WAS ANSWERING CAPASILITIES IN A OIAL tiP SYSTEM 
*» THE CALLING CPi GENERATES A S/® SRANCH TO AN ANSWERING ROUTINE 
* TRE IST TEXT AFTER ID VERIFICATION ESTABLISHES THE COMM FUNCTTON 
*» CPU SIGNALS TRIBUTARY STATIONS TO HANG UP WITH OLE EOT 
& 
* NORMAL CYCLING ROUTINE IF NOT ACTIVE 
*% 
SASUP Ww 0(2)99193) HANG UP THE PHONE 
SAS1 C ALOKACAZERAS TEST WHETHER THE SYSTEM IS OPEN 
RC #410(2)55451(8) IGNORE A CALL IF SYSDN 
C PSFLAG(1)s, SPACE IS THERE ANOTHER OPTION ACTIVE 
BC *410(2)9SAS1(8) IGNORE A CALL IF THERE IS 
AC DOORI7)IZREANINIO?) PHOwWE RING CAUSES SERVICE REQUFST 
BC SaS1(8) RETURN IF NOT CALLED 
4 
* ID FXCHANGE ROUTINE © 
% : 
READIO MC ROID(10) sREADIT SET READ IO INSTRUCTION IN ROUTINE 
BC ACKRDX76(6),READIT (5) G9 TO CGMMON READ ROUTINE 
C SACK2(6) »KABEL COMPARE RECIEVED [0 WITH KFY 
BC SkKIO(2)54%4«10(5) REPURT BAD IDEN 
BC tFED*1(6)esCONSOL(5) GO TO TEST MSSGQ AVAILABILITY 
MC ERR19™SGQ INCORSECT JD ERROR MESSAGE 
MC SACK2(6) sMSGO+6 LTHCUORRECT OATA TU MESSAGE also 
RAC NAKIT(5) REPLY "!ACK TO INVALIN {0 
ORG aah USE ANY UNUSED AREA 
DOGR DM cr 3 DIAL S/R CHAR 
wORKD OM €3'!000! PICTUSE CALCULATION wORK AREA 


ns 
~~ 


( 
ASSFMALER TT CRNBNP & MDTS SYSTEM WITH cHRONGE Ycar XMISSION 10/11/71 PaGE 0035 
SEQ. LOCN JINSTR/VOATA OP ASR MT R/S MI LINE I“44GE 


35746 O200 5?>t1H1N011 O1 27256 § 0 O011 16 1787 SKIO W SIN(5)s11¢01) WRITE DO 
3578 . 1788 + 

3580 , 1783 * INTERPRET HOST COMMAND ROUTINE 
SR? 1790 * 


329834 GALS PL»*SGVYIPISK OR 14990 4 4 2358 1 0 1791 SKIOO MC Z2FRNS(1)s4CKO+6 RESET ACK SFEQUENCE 

2584 O02PN PHaTIDIANG O8 856650 9 0 18209 1 ~«0 1792 MC ONE, ACKY RESET ACK SEQUENCE 

B5Re 0290 87220061749 08 F2PA0 %~ 0 1760 14 56 1793 MC ROF'IIN(10), PF ADIT SET I7N INSTRUCTION IN ROUTINE 
259%) OP4n VJ 4uX65174N 11 #1786 6&0 1749 5 0 1794 BC ACKRAK+6(6),ACKRDO(5) BRANCH TO COMMON READ DATA ROUTINE 
3592 G2656G snPuAKnANANnD 14 0050 390 0n00 Nn DO 1795 BC SASUP(3) GQ TO HANGUP PHONE ON DLE FOT 
3594 0265 PRIRRB?PI17TA 14 2233 ON P1176 4& OA 1796 C STEXT#1(4)eFUN IS FUNCTION TEXT VALID 

5946 9P7C RORKNKE1469C 11 97920 20 1490 §& O 1797 BC #410(2)sS0CK2(5) CONTINUE IF VALID», ELSE SEND ENT 
3S59R 9280 PTS7¥9437V 14 43770 0 G 43760 1 °0 1798 C PSFLAGsSPACE ANOTHER OPTION ACTIVE? 

324500 0299 VIYGAZIREO 14 1936 6 0 1859 3 0 1799 “BC wwACKx+6(6)sWTWACK(3) G)? TO SEND A wACw REPLY 

3602 1200 * 

2604 ROL TESY FUNCTION CODE TO OETERMINE LOGICAL ROUTE DEMANNFD 
34506 180e _ & ; 

3698 0350 PRZ2714EC1! 14 PPRF AN 48065C 1 O 1803 C RIDsGNE TEST FOR SYSTEM CLEAR FUNCTION 
36190 6315 RLPVROANM 141 1060 290 n0n9go a0 1804 BC NEFOG( 2) 

S41? O3P9 PRER71459AV 14 2APRT O90 45N6E 1 0 1805 . C RIOs, TWO TEST FOR STATUS POLL 

3416 O3A0 ROYATANAGA 11 9910 2? 96 0000 94A49 1896 RC STAPOL(2) . 

3¢16 O366 PRERTIVG9IY 16 2PR7 AC 1499C 1 0 1807 C RIC,ZERCS TEST FOR DATA POLL 
3618 03250 20OTRSCHNAG 11 faeo0 20 0fNN 4 O 1808 BC vaLPC(2) 

3620 Q36R PRARI145SOY 1H PAPBF 1.0 4609C 1 O 1809 C RIODsFIVE TEST FOR ONePLINE UPCATE 

362°? Q370 RTF KOANHANA 11 1080 2 0 2000 nN O 1810 BC KLEEN(2) 

3626 GSR0 PReewt 4S! 14 17470 0 0 45805C 1 0 1Rii1 C ECQD,ONE ANYSODY ACTIVE 

362h 9390 ROTRPCKRI49N 41 90800 2 90 1490 & O 1812 BRC *4101(2)459CK2(5) CANT] ive ONLY IF CiCSED 

36822 CHIN PRRAZ7146RY ta PAPRF7 10 46390 1 9 1813 C RIDsSIX TEST FOR CLEAR 
3439 94190 RiPxKCKA1495 11 1N8EOQ 21699 § O 1214 6C KLEE(2),SNCK2(5) Gi) SED EQYT IF NOT VAaLTN 

34532? 1815 » 

36234 1816 # VALIDATE PICTURE CODE BEFORE CONTINUING 

363H0 : 1817 

363R 94PQ0 RRPXR?PN1I97 13 PPRR 2 00197 +2 O 1818 VALPC FN PICNR(I2)2WORKDI2) LOAD WORK AREA 

3640 O46 FN PRYRRYPN197 16 2728R 040 01197 PO 1219 C PICNR(2A)swORKO VERIFY MUMEFRICS ONLY 

3n4? 9645 OCOTHAEPE9N 14 9456 2 1490 § O 1R20 BC ¥410{7)259CK2(5) SENO ECT IF INVALIO 

3494 0457 17 INVANI97 N& ¥4hC09C 1:90 0197 A O 1821 M FIVE sWORKO(2) MULTIPLY TO VERIFY EVEN 

3646 0460 PP 7G9917489¥Y 16 0199 += ND 1499C 1 0 1222 C wORKO+2(1) ZEROS SPILL CHARACTER IS ZERN TF EVEN 
34645 0479 SOTYNK14EN 11 6480 7? 0 1490 5 0 1823 BC #410(2)sS0CK2(5) GV ON IF GOOOs ELSE EOT 

3650 O4R0  229R724637% OR PPFR7T O 0 43770 39 1824 MC RID(32)ePSFLAG SET PSFLAG AND PICTURE CODF 
3657? 9690 Viv®ési§ 30 11 1606 60 1530 § 0 18°5 BC RVRSAC+61(6),EROS(5) REVERSE THE LINE 

2654 {R26 »* ; 

3456 ise7 »* TEMPORARY TEXT DELAY LOOP 

3452 | - s 1R2R « ~ 

2460 05900 221990163N OR 2190 1 0 1630 00 1829 "WWTTD MC WTWRT(10)0,4TOATA SET TTO INSTR IN WRITE ROUTINE ~ 
34647 06810 V3IWS4814632N9 11 £17396 60 1630 5 O i230 — BC WOATAX+6(6) 2 NTDATA(5) BRAICH TO CONMONW WRITE ROUTINE 
ThA& O5PQ PHIZVIAPRIPR OR 43760 0 0 23PR 1-0 1831 MC SPACE, ACTVEL ERASE ACTIVE FLAG 
5466 05390 KXOvYonANAR 11 1690 & 02 0000 NO 1232 BC SaCCA(8) 

SHAR OS4K LT.IPLPAIMKW OF 456050 1 0 69070 2? O 1833 ww S ONFEs TTOCNT DECREMEMY TTO COUNTER 

3670 9586 TN IEPARNE4N 11 9500 4 90 O860 8 O 1834 BC wwTTD(4),SACC(8) SEND “MESSAGE IF OVERFLOW 

357? 1R35 ¥ 

36746 ; 1836 #« SEND TRANSACTION TRANSMISSION ROUTINE 

$f 7 is é 18237 * P 

Q67R OFAG PAISTISEDI! 16 11840 9 9 456N5C 1 0 1838 SACC C SCAFLG(1)s, ONE TEST SCA BUFFER FOR 'FULL! 
3539 O570 wRIVTAOSANG 114 9640 2 O ANNO 4 O 1&39 BC SACDI2) GQ) SE“D IT IF IT IS 

B68F GCSSG PY IRP THRO t+ $1800 0 N 6805C 1 0 1840 C COMFLG(1)s,0NE TEST COMMON BUFFER FOR FUEL t 
3484 O09990 RGVEAKN71IA 13 AACO 2 O 7710 § O 1841 AC *410(2)5SAS2(5) G) TEST FOR TTO IF NOT 

0 0 2365 a9 


686 C69DQ PLIRXAARASR OR 11488C 1842 MC COMAUF (100). SCABUF MOVE THE COMMON DATA BIIFFER TO SCA 


7mm 


991% 
990 
0930 
09469 
O956 
G40 
O97. 
VIKA 
0947) 
1006 
1910 
1920 
19380 
1046 
105¢ 


INSTRSAATA 


PILPRXCALASH 
HLS XC P5466 
PQ IXP&11RT 
PLIRIIPAN? 
LT4ARSYRP2AN7 
Q2PAPNDNNIAAN 
VIBSAS1THK3IN 


-PL&QGYalI Xt 


POWiUAKGOW 
KO'IVACHOANN 


PTPAKT ARN 
ROASNEAR4&N 


VOASA8595A 
PILANUEBNQAA 
JORBGEAAAAS 
PLT PIAVANRDZa: 
PORTPANTEY 
PL.SGV1T4NPw 
PS AVITR TY 
FOYYEOOAAA 
PULQTEAAIS 
PI.GXAPC IIE 
PZJseav2nraAy 
P&ANUTSAAY 
SRADBDT74HANDS1 
PRS&AATSENI 
ROVYAANAIN 
VO®SAS599pP 
P&37V1427w 
YITYNCANANA 


POARIVESI7 


VIVEARTNAN 


Pi 74Wwt AAR 
P31AV1A9RS 
PO eRRAAIWG 
PORAVAP IIA 
POE KAP IU 
PLSIY1TI PIP 
PPGEVANGSX 
RLTPINAVANAO 
P&SOMLPAIAS 
VAD VAPIA4NH 
wPIRGNIARN 
VIieSARTASOD 
ULTYAKAAGHD 


TI 
oP 


CR 
oF 
15 
8 
04 
N&R 
11 
or. | 
8 
11 


14 
11 


11 
AR 
024 
OR 
O& 
NR 
14 
14 
49 
OB 
028 
V8 
13 
14 
11 
11 
8 
11 


08 
11 
VR 
O28 
CF 
OR 
8 
08 
14 
11 
YR 
98 
V8 
13 
La 


CROBOP © MOTS 


A/R 


TPRBRC 
138RC 
11480C 
11R25C 
4639C 
P2P00 

1736 

1499f. 
O395C 
9560 


aNn2e7c 
0730 


N36 
36°56 
OREOL 
17267 
OR7EPC 
$499C 
31C6C 
F250 
&e 34: 
AAIRC 
3496C 
#505C 
P97 
P3243 
C699 - 
N036 
4376C 
14°70 


ePR7 
1406 
1747C 
3106C 
N&&Pr 
O3666 
N458C 
1499C 
NI646C 
1610 
&5O95C 
QAT79IC 
2180 
1736 
14930 


™ 


woonrrr OID WD 
oecooco ag o0 53 


Vo 


MOoPRFNOWONDIIOAVIDBOIWIDIO- DF 


Neer Ovrdvvdv Iisa w.,IO DI a FS 


I 


2990 


9eoowoo 77,0 99 90 02903900 


ooo0oo D0 970 099 30009 


B/S 


P2465 
2565 
1184C 
2207 
2207 
1430 
1430 
1184 
6307C 
coo0o 


4505C 
0540 


59500 
0327C 
0333¢ 
CR45C 
O348C 
&N27C 
7RIBC 
Onn 

0373C 
na70c 
C266C 
4649C 
nC31 

4EO5C 
90900 

5999C 
4377C 
onon 


43277C 
1630 
P2327 
P2329 
PAIN 
2236 
223K 
2226 
0458C 
1029 
P3226 
2349 
1430 
1630 
0290 


ae 


Se VF NOWWEe OD 


~— 


oP AD FFM VVRPI- KH KF VUVGIANVM 
oo 90 900 O90 99099090 00 0 


DF OVwArNAVNXVWVA era 


SYSTEM WITH CHRONO 


I 


oooo0o0oo0o 270d 


oo 


9oo0oo0oo0o 020 00 939059000 


LINE. 


1843 
1244 
1R45 
1846 
1847 
1848 
1849 
1850 
1851 
1852 
1853 
1254 
1855 
1256 
1857 
1858 
1859 
1260 
18461 
1R62 
1863 
1864 
1865 
1866 
1847 
1268 
1869 
1870 
1871 
1872 
18793 
1874 
1875 
1276 
1877 
1278 
1879 
1880 
1881 
1282 
1283 
-1884 
1885 
1226 
1887 
L&BR 
1289 
1290 
18291 
1292 
1293 
1894 
1295 
1896 
1897 
1898 


SACD 


AROUND 


* 
a 

* 
STAPOL 


( 


= 


\ 
LUGICAL XMISSION 


19/11/71 PAGE 0036 
IMAGE 
CC4NBUF+100(100)»SCABUF +4100 
CCMBUF €290(150) sSCASUF +200 
COMFLGsSCAFLG SizT SCA "FULL ' AMD COMMON fF EKrPTY' 


SET CHAP COUNT IN I/70 INSTRUCTION 
AOJIST BY 6 FIR SYNS AND STX 

SET DATA INSTR IN WRITE ROUTINE 
BRA ICH TO COMMON WRITE ROUTINE 
SETASCA BUFFER FOR. "EMPTY? 

RESeT TTO COUNTER 

RETURN FOR NEXT BUFFER ON SWITCH 


SCAFLG41(3) 5 9TART+7 
SIX( 1) 20 TWRI4+7(3) 
QTWRTE(LOsNTDATA 
wDATAX*#6(6) 4 NTOATA(S) 
ZEROS( 4) »sSCAFLG 
TTORSTsTTOCNT 

SACC(8) 


NORMAL END OF POLLING ROUTINE 


LAST RECORD ? 
REPORT IT IF LAST RECORD FI SF RACK 


LSTREC(1)» ONE 
TELLI(2)2 AWS) 

READY MESSAGE QUEVE AREA FOR ENDIt:GS 

GO TO TEST MSSO AVAILABILITY 
REPORT ENO OF TRANS TO HOST 
REPORT OITSC LIMITS 

REPORT PICTURE 

REPORT NUMBER RETRIEVED 

TURN LSTREC OFF 


NEED+116)sCONSOL (5) 
ATTO1sM4SG4Q 
TPSTT(12)94ASGQ+6 
HOLPICsMNSGQ+18 
TECTRs!SGQ+21 
ZEROS(C1)sL STREC 


ISNTIE sR IS *€°'0 FOR A RESEND FUNCTIC" @ 
AROUND(2) SKIP FIELD & TEST TF IT TS 
HOLLIMsN\XS 30 SET ANOKFEFSS UF LAST SENT NaTA 
HOLDAY+2 (2) 9 NXPIC oe SEY NEXT PICTURE FOR TRANSMISSTON 
HOLDAY(2)9NXPIC SET DAY NUMBER OF TmE NEYT PICTURE 
ONEs SENTCK SET FLAG FOR GOOD TRAWSMISSION 
OTART4#7(63) aTRI SET XMISSION LENGTH IN INODFXS 


TEST FIELON 4 OF THE ¥END MFSSAGE 
ONE MEAMS THEPF JTS MARE SO BRANCH 
GO TO CLEAR BirFrFER PCINTERS 

CLEAR ANY RESIOUAL PSFLAG VAL'IFS 
GO TO RELINQUISH TRE LINE 


PREBUF@=16( 123) 20NE 
SACCA(2) 

NEED 41(6),RESET(5S) 
SPACEsPSFLAG 
SGCKe(5) 


POLL FOR STATUS OF SYSTEM ROUTINE 


MC 
BC 
4C 
MC 
MC 
MC 
MC 
MC 
C 

BC 
MC 
MC 
MC 
BC 
BC 


SET FUNCTION TEXT OPTION 

REVERSE TRE LINE 

SEY TERMINAL ACTIVE FLAG IN RIFF 
SEY TYPE OF UNCOMPLETEN POLL 

SET CRELRIT MUMRER COUNT 
SET TRARSMISSION OAY It! 
MOVE IN TRE CURRENT DAY 
PRE@SET FLAS YO NUT CURRENT STATUS 
TEST FOR CURRERT DAY TRANSPMISSTON 
09 WOT SET CURRENT FLAG IF ™ANT 
SET TONAY ITS CURRENT 

SET TRANS FILE LIMITS IN *STA MSG 
SET ¥STA INSTR IN WRITE ROUTINE 
BRANCH TO COMHON wRITE ROUTISS 
RETURN FOR FUNCTION TEXT 


RTD LT) sPSFLAaS 
RVRSBC+6(6)2EROS(5) 
EOD(1)sSTABUF +11 . 
ISNINE sSTA3UF +13 
CICNT(6) sSTARUF SYS 
SXPIC( 2) sSTASUF 420 
DAYNRS (2),STABUF e22 
ZERKOS( Ll) sSTAMUFS4+10 
mMXPIC( 2) eDAYNRS 
#410(2)5,4420(8) 

ONE s STASUF +10 
FIRADN( Leds TRLIMS 
STeRT(10)59 TDATA 
WIATAX+O(6) 2HTODATA(5) 
SsocK2(5) 


#STA MSG 


CLEAR AND RESET POINTERS 


™~ 


aan 


Yn 
oe 
¥ 

Le ad 


n. 
ad 


SYSTEM TEN ASSFEMAIER TI CRQ602 = MOTS SYSTEM WITH CHRONOLOGICAL XMISSION 10/11/71 PAGE 0037 
SEGe LOCN INSTR/NATA OP ASR MI R/S M&M YI LINE IMAGE 
3800 1899 *» 
380? 1060 VGOPSAS5G5P 11 0036 6 0 5850C 5 O 12900 NMEFCG 6C NEFO*1(6)2CONSOL(5) GQ TO TEST MSGG@ AVAILAARILITY 
320% 1070 P2:0855N3PWw NR 2105 O00 0327C 5 O 1901 MC ATT10s,"SGOQ REPURT CLEARING 
32046 1902 « 
3808 1903 *#* PREPARE TO RECIEVE TRANSMISSION BLOCKS 
3R19 1904 -*»s 
3812 1080 vO8S4é5599P 11 1036 6 0 59900 5 0 1905 KLEEN BC NEEN+1(6)sRESETI(S) G) TO CLEAR BUFFER POINTERS 
321% 1090 P297R8714397% NR PPR7F7 OO 0 42770 1 O 1906 MC RIDsPSFLAG SET PSFLAG VALUE 
3816 1100 Pise9gy1anav OR 149900 NO 40°6C 1 0 1907 MC 7JEROS(LISZEOQTFL ReScT EOT FLAG 
3818 1110 P43I7V9PRPR O8 43760 O 0 232B 1 0 1998 MC SPACES ACTVFL ERASE ACTIVE FLAG 
3820 11°90 POARTII49Y 14 1184C 0 0 1499E€ 1 0 1909 °C SCAFLG(1)sZ2EROS TEST SCA BUFFER FOR ‘EMPTY? 
3R2? 11320 RIRPRGRII5A 11 1720 P00 1150 80 1910 RC CLIF2(2),CLIF8(8) GON CHECK COMM BUFFER IF NNT 
3824 i911 *» 
3&26 1912 * RFCEYVE ACCOUNT NUMBERS 
3822 1913 # 
38390 1140) Painiut1s1RY O88 465050 0 N 11840 1 O 19144 CLIF1 MC ONEsSCAFLG SET FLAG FOR SCA BUFFER 'Fiili ? 
3837? 1150 PRURETERt 14 «£180C 49 0 4505C 1 9 1915 CLIF8 C COrrFLG(1).,O0NE TEST COMMON BUFFER FOR 'FInL? 
38846 1160 Vivssr1a25n 11 1936 60 1850 20 1916 BC WwACKX+6(6)s2 ATNYACK(2) GO TO SEAD WACK IF IT TS 
S836 1170 RitTvanannn 11 1460 20 0Nf00 90 1917 &®C CEATX(2) BRANCH’ IF AN EOT WAS RECIEVER 
3338 L18O PRWBMeENIIAaKX NB 2264 OO 11880 N O 1918 MC SCABUF41(190)2COMBUF Move SCA (LESS STX)} TO COMMmO? 
33240 11960 P2LhABCIARXY 08 P&6E O O 178REO N O 1919 MC SCARUF+4+101(100).COMBUF +100 
3R4P 1200 VYe256A113RY AR 2566 § 7 13880 1 9 1920 MC SCABUF+201(51) »COMBUF*¢200 MOVE REMAINDER (WITH ETX OR FTB) 
AR4e 1210 PE TKPHITRT 15 11800 0 0 11840 4 GO 1921 X COMFLGsSCAFLG SET COMMCN 'FULL' AND SCA 'FMPTY! 
384K 1220) BPPAKHNC1760 OCR 2240 16 3740 10 1922 CLIF2 MC RGDATA(10),READIT SET 170 INSTRUCTION IN ROUTINE 
3R8&R 1230 V1«X4A51740 11 1786 60 1740 § O 19e3 BC ACKRO¥Y+6(6)}2ACKROD(5) RBQIANCH TC COMMON READ DATA RO!I'TINE 
3859 1260 S1iTVvAANNACO 11 1460 30 7000 ana 1924 BC CEOTX( 3) : GO TO TERMINATE FUNCTION TF DOLF 
325° 1925 -« 
3854 1926 «# EVALUATE NATA RECEIVED 
3256 19°97 *»* 
385R 1250 PP2HK4NN11 NB PP4E 09 OO11 & 1928 MC RODATA+6(4),IR1 SET READ LENGTH IN INDEX 
3269 1260 4PePP4NNT1 AF ConNCC & O ONL «& O 1929 CLIP S 8AZ(4)sTR1 GET CHAR CFUNT IN IR1 
GRAP 12070) PRSBBIV9ONV 14 2363 9 1 6¢06C 1 0 1930 C SCARUFe2(Lr»,1IsETS TEST LAST CHAR IN BUFFER FOR FTB 
3264 1°PRG RISARFAANS 11 1350 20 AnNG ADA 1931 RC CLIF6(2) ET3 AS FINAL CHAR CONTINUF 
3866 1°90 PRSAQWINI1H! 14 2263 O 1 5115C 1 0 1932 C SCABUFe2(1lslisETX TEST LAST CHAR IN BUFFER FOR FFX 
386R 13900 Fi1Snaecracann 11 °1350 20 9000 490 1933 BC CLIF6(2) GON) ENDING IF YES 
3R7G LBiN  PRSAK1AG4! 14 PRBH 0 0 469450 1 0 1934 C SCABUFI(1),ENA TEST FOR ENQ RECIEVED 
BR27P 13PN RLRRELAANA 11 172720 2 9 O00 9 90 1935 BC CLIF2@(2) | ACK THEIF ENQ XMISSION 
32746 1339 PRS6R1PbAY 14 2365 1 09 2449C 1 0 1936 C SCARUF(i)SENT TEST FOR EQT RECIEVE 
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620 2275 ERROR 0001 0005 0136 ERROS® OM CrERROS'! 

625 0137 »# . 

630 2280 xaexannanan 11 2810 8&8 0 0000 00 0138 RONL BC PRNTON(3) TEMPORARY S/R BRANCH FOR NEV 7 
635 : 0139 » 

i640 0140 «# ENTRY POINT FOR PRINTING REPORT GN DEVICE 7 WORKSTATION 
1645 | O141 «# 

1650 2290 V3WS18353N 11 3731 6 0 3830 § 0 0142 CENTI BC SETWRI+1(6),0EVSV(5) SET I/0 TO DEV 7 

1655 2300 V3PS1RANNN 11 32031 60 3000 8 0 0143 BC PRELM+1(6) »sINARY(8) DO PRELIMINARIES 

1660 2310 V3APIKRANSEN 11 3101 6 0°3040 § 0 0144 "- BC TABSET+41(6)sALFRM(5). 

1665 23°09 P59v817110 09 5964 00 2110 1 0 0145 CENTIS MN ZERQ(L)»sWKST ~ TAKE SECOND S/R BRANCH OPTION 
1670 2330 G@737NNN330 AR 2370 1 0 0330 40 0146 MC wkSACT(10})5s330P TELL DEV O LOGIC YOU'RE ACTIVE 
1675 23460 VvePaATsPnANN 11 2N11 6 0 2000 § 0 9147 ACTWKS BC SRVCE41(6)*REQST(5) TEST FOR SERVICE REQUEST 

168N 2350 VSwx1Raean 11 5781 6 0 4640 8 O 0148 BC RIITN4#1(6)sREAD(8) READ AND WRITE A LINE 

1685 7 : 0149 « | 

1690 2340 xosenannann 14 03200 8&8 4 Oh00 40 0150 * BC RNX(8) RETURN To DEVICE ZERO LOGIC 
1695 | 075i «# 

1700 0152 »* ENTRY POINT FOR REPRINT OPTION USING DEVICE 7 WORKSTATION 
1705 0153 * | 

1710 2370 xestTannnno 11 2240 & 9 N000 4 O 0154 WwKSACT BC aCTWKS(8) ; TEMPORARY RRANCH IN PO 

1715 2380 vVv3wS163830 11 3731 6060 3530 5 0 0155 CENTS BC SETWRT+1(6),D0EVSV(5) SET Iv0 TO DEV 7 

1720 2390 V3PS1683NNN 11 3031 60 3000 5 0 0156 BC PRELM41(6) s,INARY(5) DO PRELIMINARY ROUTINES 

1725 2400 v3 3i!IP1R311N 11 3501 6 6 3110 8 0 0157 BC WHADA+1(6)sYAWANT(8) FIND OUT WHAT TO REPRINT 

1730 2410 V3MPP162304N 114 3101 & 0 30460 § 0 0158 BC TABSET+41(6}s ALFRM(5) DO ALIGN FORM MESSAGE 

1735 242°2N K2e2SRANNNNN 11 2320 8 0 0000 O00 0159 BC CENT15(8) USE NORMAL WRITE LOGIC 

1740 0160 *# 

745 0161 es» 2 eR He He He OHhCU MU hUhhUh Fh PH OH RH HHH he He BK KE KH He He HH HHH HF BH 
1750 0162 #. . 

1755 0163 ANALYZE THE OPERATOR ENTERED CODE AND SELECT THE 

1760 0164 CORRECT ROUTINE+ VALINATE FLAGS FOR THE STATUS OF 

1765 , 0165 -»# THE SYSTEN AND REPORT TQ THE OPERATOR IF UNABLE TO RILIN 
1770 . 01646 »* THE TOTALING PROGRAMS 

1775 O167 # 

780 0168 x»*&He Me HH HR HhUHhUc hr HhUh A eH He He YF HH HE He KH HH FHF HF Hh HF HH HE BY HR SH 
1785 0169 « 


( 


SYSTEM TEN ASSFMALER 


SEG. 


0790 
0795 
0797 
0798 
0800 
0805 
oa8in 
0815 
08?0 
0825 
0830 
0835 
0870 
0875 
0880 
0885 
0390 
0895 
0900 
09n5 
0919 
0915 
0920 
0925 
0939 
0935 
0940 
0945 
0956 
0955 
0960 
0965 
0970 
0975 
0980 
0985 
0990 
0995 
1000 
1005 
1010 
1015 
1020 
1025 
1039 
1035 
1040 
1945 
1050 
1055 
1060 
1065 
1079 
1075 
1080 
1085 


LOCN 


2430 
2440 
2450 
2444 
2450 
2460 
2470 
2466 
2470 
2480 
2490 
2486 
2490 
2500 


2510 
2520 
2530 
2540 
2550 
2540 
2579 
2580 
2590 
2600 
2610 
2620 
2630 
2640 
2650 
2660 
2670 
2680 
2690 
2700 
2710 
2720 
2730 
2740 
2750 
2760 
2755 
2740 
e770 
2780 
2790 
2800 
2810 
2805 
2810 


INSTR/DATA 


PP37589755 
R2ugananan 


79758 
PPS7556145 
Rexunanann 


79786 


-PPS7555125 


ReYTONNNNOA 


9595 
PHNNRENI7H 
RIVSORNK2N 


G2 R&8N0033N 
222P830001 
P59V412710 
V6UP156870 
PS53644880031 
P6&79?PHh2996 
PS59V817H15 
P59V81PARS 
PvYW9AVVxXY? 
V46S2126170 
P2xXNNNP57N 
P70NNKEANAI 
V6QTISENSN 
1S5NK246NA1 
VONTISANSNA 
PUR&R27795 
V6S2126150 
P2xRNN?P57O 
PUR45 27796 
R2WAN5P76N 
Pewranannn 
2? eP830001 
SPRKTORPTAN 
PS4OV41?P7IO 
xoSPANnNAAN 


RRiI PR 

277Y5501 32 
RP ATN322790 
X2avoOaNNNN 
P29S991?710 
xoaseponannn 


LELEL 
22 RPH320004 


TJ 


oP 
14 
11 


14 
11 


14 
11 


14 
11 


A/R 


0375 
2510 
2446 
0noi 
0375 
2250 
2466 
NNOL 
0375 
2940 
2486 
0001 
7108 
3930 


2Rr4&0 
2205 
5964 
6501 
5964 
6792 
5964 
5964 
679? 
6411 
2R10 
7006 
4141 
2506 
4441 
5748 
6311 
2210 
§245 
2710 
2740 
P05 
2740 
5964 
0300 
2755 
nant 
7795 
2740 
2760 
2939 
0300 
PRO5 
nno1i 
28205 


NF R?OO 


M 


0 
2 


uo 


XDOWNIDNGOOVOPW" FOOCOPCOCPVODOCBRON -~ 
Sosgcoocoac0eoeo 27900 e200Wwo0 920 Se 0 [3800 


~x~oOeoVNY 
ooo 208 


T 


0 
9 


B/S 


2755 
0000 


0004 
6145 


0000 


0004 
§135 
0000 


0008 
0375 
0620 


0330 
ooo! 
2710 
6470 
0031 
2994 
2415 
2685 
689? 
6170 
2570 
6061 
6950 
6961 
6050 
7735 
6150 
2570 
7735 
2760 
0000 
N01 
2720 
2710 
0000 


0005 
0132 
2790 
0000 
°?710 
0000 


0005 
0n04 


“RASA INTERFACE WITH 


oOo" OW SF 
oo ooso 


Qe SBwWoRWVOVNUAMNF OVP KH HK FMA WD 
qQodeeoo0oceceocdceeocoowo oon 0 e000 } 


I 


0 
0 


LINE 


0170 
0171 
0172 
0173 
0174 
0175 
0176 
0177 
0178 
0179 
0180 
0181 
0182 
01893 
0184 
0185 
0186 
0187 
0188 
0189 
0190 
0191 
0192 
0193 
0194 
0195 
0196 
0197 
01 $8 
0199 
0200 
0201 
0202 
0203 
0204 
0205 
0206 
0207 
0208 
0209 
0210 
0211 
0Ae12 
0213 
NP 14 
oP15 
0216 
0217 
0218 
0219 
0? 20 
OpP21 
0272 
0223 
N224 
0225 


eS 
S SYSTEM 


MOT 10/11/71 PAGE 0004 
IMAGE 
LABLTS C LABELsRRLPR PRINT ON LINE PRINTER? 
BC MILL(2) 
ORG #04 
MSGPT2 DM AtMSGTAB? 
C LABELsRRPRN PRINT ON WORKSTATION DEV 09° 
BC PENNY(2) . 
ORG 204 
TABRST OM At*MSGTAB? 
C LABELsRRREP REQUEST TO RE@PRINT? 
BC NICKL(2). 
ORG #04 
MSGLM DM At*MS5TAR4+1620' 
C NAFUD,LABEL REQUEST FOR CREDIT FILE UPNMATE ? 
BC CITUPD( 2) sDUMNY(8) 
a 
aeeyup,euneynyupse_e uu eyupsp_pueupupnBDPQepervxe eu ewS ESR SRe He a ee Ee BD 
s 
* LINE PRINTER WRITER ROUTINE 
x 
*oeepeepeupux_.ese,s 8 ue BueU 8 eee ERHR HEHE PR ERR RaR EBS 
s 
MILL MC SCURMN(10)2330P MODIFY MOTS PO FOR PRINTER 
W FF(2),1(93) 
MN ZERO{L),FF Sw THYRN FORM FEED SwITCH OFF 
AC GETIN+e1(6)sSTATBL(5) RETSIEVE STATUS TABLE 
MC ZEROS(4)4R3 
MC D3, ADR INITIALIZE ADDRESS 
PRNTR ., MN ZERO(1)sSTOPSW+5 TURN STOP SKITCHK OFF 
MN ZERON(1)2STAPSW+5 “TURN STAPSw OFF 
PRIACT C N3t23)s04(s3) THIS FILE AY LIMIT 
8C LINK+1(6)sPRNTFL(2) LINK ON EQUAL 
STOPSW BC PRNTON(0O)2PRNTRIO) STNPSW TURNEO ON IN LINK ROUTINE 
MC LINE ADSsREADL OL SET READ FOR FIRST SECTOR 
BC RED1+1(63eNSC(5) 
A FIGHT,READI41(3) BMP TO SECOND 
BC PED1+1(61s9SC(5) 
C SLASHeLINE TEST FOR END 
BC LINK+1(6)sPRFLE(2) LINK IF EQUAL 
STAPSW BC PRNTON(0)sPRNTRIO) STAPSW TURNED ON IN LINK RQNUTINE 
C EOPstINE TEST FOR END OF PAGE CONF 
EOPTST BC FFSWt2)sWRTILN(S5) TRY FORM FEED IF YES» ELSE WRITE 
FFSW BC TRNOFFLU) SWITCH IS OFF IF NO#=OPPED 
W FF(2).113) TOP OF FORM TO PRINTER 
BC ¥*4¢10:/3)2. 421018) 
TRNOFF MN ZERO(1)59FFSW TURi SWITCH BACK OFF 
BC R(I)X(8) 
ORG #5 
RRLPR D™ CIRRIPR! 
WRTILN W LINE(2)2132(5) WRITE A LINE OF REPORT 
BC TRNOFF(2)5 TURNON(3) GOGD IF 2s AUTO TCF IF 3 
BC wWRTLN(8) ELSt FAULT 
TURNON MN FIVE( 1) oF FSW TURN SWITCH ON 
BC ROX(8&) 
ORG *e#5 
FF OM CILLLLL! 
PRNTON W FF(2154(3) CLEAN PRINTER 


? 


SYSTEM TEN ASSEMAI ER 


SEQ © 


1090 
1095 
1100 
L105 
L110 
1115 
1120 
L125 
L130 
1135 
L140 
L145 
1159 
L155 
1160 
1165 
L170 
L175 
L1R0 
1185 
1190 
1195 
1200 
1205 
1210 
L215 
L220 
L225 
1230 
L245 
L240 
1245 
1250 
1255 
1260 
1265 
£386 
1385 
1390 
1395 
1400 
1405 
1410 


1415 


1420 
14205 
1430 
1435 
1440 
1445 
1450 
1455 
1449 
1465 
14790 
1475 


LOCN 


2820 
2830 
2840 


2850 
2860 
2870 
2880 
2890 
2900 
2910 
2970 
29:30 
2940 
2936 
2939 


2940 
2950 
29460 
2970 
2940 
2990 
3000 
2994 


3000 
3010 
3020 
3030 
3040 
3050 
3049 
3070 
3030 
3090 
3100 


INSTR/NATA 


V3VP1R3740 
xosreoanaan 
Xeuyaanonann 


P59v4a127100. 


V3wWS1RAS1N 
V3PStTRINNN 
V39°1630 aN 
PPS2V1093AW 
V5 41X11 5A7N 
v2Peq1K828qnNN 
V5wWxX15 46480 
x2xyannannn 


004 
5 


P59V 412100 
V3wWS1R 2510 
v3PSs16300N 
V311IP 1RA110 
V3NP 1K INGO 
x2xynnnnan 


00nn0N 


V6IIP15 4470 
P§96440031 
P679PVR9O94 
x3PsanNnNNN 
os1Ta3qnant 
77 AIAGNNEA 
R3PWORIANAN 
wO?PONN3AN|AN 
XIPWNANNNN 
V5 IX1RSH4N 
u3snNPAANAAN 


TT 
oP 


11 
11 
ii 


09 
11 
11 
11 
14 
11 
11 
11 
11 


n9 
11 
if 
11 
11 
11 


11 
O08 
08 
11 
4 
01 
11 
11 
11 
11 
11 


NFRP00 © RASA INTERFACE WITH MOTS SYSTEM 


A/R 


3901 
0300 
2590 


§964 
3731 
3031 
3101 
0326C 
§781 
Patt 
5781 
2290 
2936 
0n0o01 
0001 


5964 
3731 
3031 
a501 
310% 
PR90 
2994 
on0t 


6501 
5964 
4792 
3030 
§140 
7356 
3070 
N?900 
3070 
5781 
3100 


M 


oY 


BeOP ORO AS 
eo0oo0oo0ooe3o 


oOnrnererao 
ooococc0oso 


WMerwonNNNOWWOSO FH 
ooo 90 00 0oWS0 3 


I 


0 
0 
0 


B/S 


3740 
0000 
0000 


2100 
3510 
3000 
3040 
0227C 
5670 
2000 
4640 
0000 


0003 
ocol 


2100 
3£10 


"3000 


3110 
3940 
0000 


0006 


6470 
9031 
2994 
0000 
ONO! 
0053 
3040 
3090 
nn00 
5440 
0000 


M 


ONN sm WDD A O93 Bb 


> i W UI OO Fr 


FT WMODDUWVDNONM SU 
9S9oao0o0coqo0o00 2 


OCO000009000 


oocoao°o 


I 


oo 0 


LINE 


0226 
0227 
0222 
0229 
0230 
0231 
0232 
0233 
0234 
0235 
0236 
0237 


0738 


0239 
0240 
0241 
0242 
243 
024% 
N245 
0246 
0247 
0248 
0249 
0250 
0251 
0252 
0253 
0? 54 
0255 
0256 
0257 
0258 
0259 
0260 
0? 61 
0? 62 
0263 
0264 
0265 
0266 
0267 
0268 
0269 
0270 
0771 
0272 
0273 
0274 
0275 
0°76 
0277 
0°78 
0279 
0280 
0? 81 


BC SETBK41(6) »sNORML (8) RESET NOCIFIED INSTRUCTICNS 
MYURRY BC ROX(8) RETURN TO NORMAL SYSTEM 
SCURMN BC PRIACT(8) MODIFYING INSTRUCTION 
as 
»eeueeenpneenpeeupeehenpe,eagrwrerseBPeaes®ese,eunse_eepeeupen,eve_rxearxn yeu & 
* « 
- WORKSTATIIN AS DEVICE ZERO PRINT LOGIC 
. 
a ee ee ee ee 2 ee 
- 
% . 
2 ENTRY POINT FOR NORMAL PRINTING USING DEVICE 0 WORKSTATION 
&% 
PENNY MN ZERO(1)seCOMTER ALLUW S/R INTERRUPT 
BC SETWRT4+1(6)s DEVZRI( 8) SET I1/N TO DEVICE ZERN 
BC PRELM41(6) 2 ITNARY(8) DQ PRELIMINARIES 
BC TASSET+1 (6). ALFRM(S) 
MSGTST C FREEsMS5&O IS THERE A MESSAGE FROM FOTS® 
BC RITN4#1(6)2TSBLMSG(1) TABLE MESSAGE IF THERE IS 
BC SRVCE+1(6) sREGST(5) TEST S/R INTERRUPT 
BC RITN41(6)2READ(5) REAV AND WRITE A LINE 
BC mSGTST(8) GO eACK FOR NORE 
CRG sah 
OHFOUR ON Cr'9004! CONSTANT OHFOUR 
FIVE OM crs! CONSTANT FIVE 
s 
s ENTRY FOR REPRINT OPTION YSING LEVICE O KORKSTATION 
x 
NICKL MN ZE80(1),CONTER ALLOW S/R INTERRUPT 
BC SF TWRT4+1(6)2D0EVZ2(8) SET 3179 TO DEV ZERO 
BC PRELM*1L(6) ,INARY(5) DO PRELIMINARY ROUTINE 
BC WHANDA+41(6)sYAWANT(8) FIND QUT WHAT TO RE @PRINT 
BC TASSETe¢1(6)sALFRM(5) ON ALIGN FORM MESSAGE 
BC MSG1ST(8) GO TO NOPMAL 4ARITE LOOP 
ORG “6 
AOR DM C'0nN0090' 
* 
a a or a ar a a ee a ee a ee a er ee a Se Se a Se Sr Sr Se Sr Oe See Sar Oe ar Se Sa Sa ae | 
* . 
* PRELIMINARY ROUTINES FOR PRINTING REPORT 
*% 
a e*eeepeeneepnpeneeeans BRRBeaAS HR HHS ERA HKR HE RH RH HRS! 
* 
INARY BC GETIN41L(6) 2STATRL(5) RETRIEVE STATUS TASLE 
MC ZEROS( 4) aR3 
MC 03(623)s2 ADR INITIALIZE AOR 
PRELM BC #(8) RETURN 
ALFRM WwW CR(0)21(3) 
ALFRM1 W ALMSG(7)s53(5) WRITE ALIGN FORM MESSAGE 
BC *410(2)sALFRM(8) 
BC 2001(7}4¥4¥+29(9) WATT FOR SERVICE REQUEST 
BC *=10(8) 
BC RITN4#1(6)eVTABI( 8) LOoav) VERT TAB REGISTER 
TABSET BC #15) © RETURN 


vy 


Po ar oar a ar ar a ae ae ae a a Oe a Se Sr Se Oe Cr a Se Se Sa Oe Se Se Oe Se Se a Se Se Me | 


10/11/71 PAGE 0005 


IMAGE 


SYSTEM TEN @... 11 NFRP00 «© RASA INTERFACE WITH MOTS SYSied 


10/11/71 PAGE 0006 
SEQ. LOCN INSTR/D&TA OP ASR MY BSS MEF LYNE IMAGE Cc 
1480 Q7?82 * 
1485 0783 »# ROUTINE TO QUERY OPERATOR ON A REPRINT OPTION 
1490 0284 -»* 
1495 | 02P85 *aseeepeppen ee RE RH HR HR RE HF eERReRA HR Se RHR He HF HS BHR HR 
1500 a 0286 »* 
1505 3110 751TN2300N1 O01 85140 7 0 OGO! 3 0 9P87 YAWANT W CR(7)21(3) ; 
1510 3120 774°960035 01 7409 7 0 0035 5 0 O?P88 YAW1 W REPMES(7)5s35(5) REQUEST PAGE CODE 
15165 313N R3ITNR3A11N 11 3140 20 311060 8 O 02839 BC #410(2) 5 YAWANT(8) 
1520 3140 7793150015 00 7031 79 0015 § 0 06290 YAW2 R STRSTF(7)215(5) READ CODE 
19625 3150 R31VNR311N 11 3160 2? 0 3110 & O 0291 BC #41012) YAWANT(8) 
1530 3160 P77S8147?994% 09S 7031 00 299% 6090 0292 MN STRSTP(6)sADR USE NUMERICS 
1535 31760 PRY9447031 14 299% 090 7031 4 90 0293 C ADR,ASTRSTP VALIDATE ENTRY 
1549 3189 R33 IYNKRALTIN 11 3190 2? 0 3110 8 9 0294 BC #410(2)»s VAWANT(8) ASK AGAIB IF NOT 
1545 3190 751rnannnt 01 5140 70 0001 3 0 0295 YAw3 Ww CR(7)2113) 
1559 3290 774T4&80NAP7 01 744% $7 0 0027 5§ 0 0296 YAWS W MESREP(7),27(9) REQUEST ENDING CONDITIONS 
1555 3219 7517N3NNN1 O01 5140 7 0 0001 3 9 0297 YAWw&t w CRI7)211(3) 
1560 3220 774w1650N35 01 7471 70 0035 § 0 0298 YAW&2@ WwW MSREP(7),35(5) 
1568 3230 R3RTOR319N 11 3740 2 60 3190 8 0 0299 BC #410(P)sYAY3(8) 
1570 3249 7792371NNOR 00 7037 70 0008 1 90 0300 YAWS5 R STRSTP4+6(7),8(1) READ PAGE CODE 
1975 32350 R&2°vVNR319N 11 3760 2? 0 3190 8 0 0301 BC #41012) YAN3(8) 
1589 3260 P§S964490N31 08 5964 Of 1031 & 0 9392 MC ZEROS(4)9R3 
1585 3276 PS'10717037 14 3507 00 7037 1 490 0303 C NEEsSTRSTP+6 TEST FOR DAILY 
1599 3280 R3sSuaqaqanaQqnNN 11 33250 2 0 0000 9 0 0304 BC GAILYie) 
1598 3°90 PS'!1N817027 14 3650R Of 7037 7 £=0 0305 C ABUsSTRSTP 46 TEST FOR WEEKLY 
1600 3300 R3STANANNN 11 3240 20 0000 90 0396 BC wEEKLYl2) 
1605 3310 =PS'iNS17N37 14 3509 0.0 7037 1 #0 0307 C EMsSTRSTP46 TEST FOR MONTHLY 
16190 3326 R3SS60983190 11 3330 20 3190 § 1 0308 BC MONTLY(2)9 YAW3(5) 
1616 3330 1Vv998480N0231 N& 6995 10 ON031 & 0 0309 MONTLY A SI XsR2 BUMP REGISTER 
1620 3340 1V39840073! N4& 6995 1 0 0031 4 0 0310 WEEKLY A SIXsR2 BUMP REGISTER 
1625 3350 PRYSs&AstiY? 14 2994 0 0 6592 6 3 0311 OAILY C AODRsD1it23) TEST FIRST ADDRESS FOR LimsrTs 
1630 3360 93 9NNANNNNN 11 3110 1 0 0000 990 0312 BC YaawANTil) 
1635 3370 PRv9eAavy? 14 299% 0 6692 6 3 0313 C ADRANA (23) . 
1640 3380 @Q@3SVNKR311N 11 3390 19 3110 8 0 0314 BC #+10(1)2YAWANT(8) 
1645 3390 PUS&8917039R 14 5349 0 0 7038 1 0 0315 ° C SPACE(1)»sSTRSTP47 TEST FOR #7ON END® CONDITION 
1650 3400 R3Z:IPANNNND 11 3500 20 6009 900 0316 BC WHADA(e) LEAVE IF YES 
1655 3410 P7)SRATNAN O09 7O03R O00 7N0N 460 £0317 MN STRSTP+7(6).ADRA USE NUMEPICS 
1660 3420  PWPOANK7NAR 14 7N00 O 0 7038 60 0318 C AMRASSTRSTP+7 VALIDATE ENTRY 
1665 3430 R3BTTARAIIN 11 32440 2@ 0 3190 8 O 0319 BC #410(2)sYAN3(8) 
1670 3440 PwenannélliY¥? 14 7000 00 6892 6 3 0320 C ACQCRAsD1(93) TEST wWKITHIN THIS FILE LIMTTS 
1675 3450 aQ3NYONNONANN 11 3190 1 090 2009 OO 0321 BC YAW3(1) 
1680 3460 PWwPONKEVY? 14 7000 OO 0 6692 6 3 N3ee C AMRAeN2(s3) 
1685 3470 Q3TxNR319N 11 3480 19 3190 & 0 0323 BC e101)» YAW3(8) 
1690 34R2N0 P298916970 NG 2939 0 0 6270 1 0 0324 MN FIVE sREPSW1 PREVENT WRITE OF STATUS SFCTOR 
1695 3490 P5XV4IisAAN 09 5964 00 4660 1 0 0325 MN ZERON(1),REPSW N9eOP THE RETRY SWITCH 
1700 3500 U3PTAANNANO 11 3040 § 0 aCNG 94 O A326 WHADA SC ALFR‘M(5) ALIGh FORM MESSAGE 
1705 3510 3505 0327 ORG #5 
1719 3505 1 N00! 0001. O3°R ONE OM crit 
1715 3506 8 NNO1 0nN01 0329 EIGHT ODM C#8? 
1720 3507 O ano! oo0t 0330 O€€ DM ¢c'0! 
1725 3508 WwW ono, oo0n1 0331 ORU OM Ctwet 
17320 3509 MM 0001 N001 0332 +&EM OM CM! 
1735 0333 * 
17490 023% $$." * * © *# «© %& ® KR HB HR MR RM RB RS RHR RK HE RM MR KH He HE RR HE RR HR FF 
1745 03235 ¥* : 
1750 ‘0336 * ROUTINE TO SET I/O INSTRUCTIONS TO DESITREN CODE 
1755 0337 #«* 


Ta 


/ 


SYSTEM TEN  ... 


SEQ. 


1769 
1765 
1770 
1775 
17890 
1785 
1799 
1795 
1809 
1305 
1810 
1815 
1820 
1825 
1830 
1835 
1840 
1845 
1850 
1855 
1860) 
1865 
18790 
1875 
18R0 
~—618RS 
18990 
1895 
1900 
19058 
1910 
1915 
1920 
1925 
1930 
1935 
1940 
1945 
19590 
1955 
1969 
1965 
1979 
1975 
1980 
1985 
1990 
1995 
2000 
2005 
2010 
2015 
202) 
20P5 
en3an 
2035 


LOCN 


3510 
3520 
3530 
3525 
3530 
3540 
3550 
3540 
3570 
35380 
3590 
3609 
3610 
3620 
3630 
364060 
3650 
3660 
3670 
3680 
3690 
3700 
3710 
3720 
3730 


3740 
3759 
3760 
3770 
3780 
37930 
3890 
3810 
3820 
3830 
3840 
3850 
3860 
3870 
3880 
3897 
3900 
3910 
3920 


INSTR/DATA 


P5944713828 


UanTAANNHAN 


P2916132525 
P35754189R8N 
P35251529N0 
P3575154 an 
P352751544n 
P352615690 
P352615490 
P352?81574n 
P352515750 
P35251574N 
P3527513N4N 
P35251305N 
P3521 3110 
P3525134120 
P352512140 
P35281319N 
P352819700 
P357519P1N 
P3575132AaN 
P35278123274N 
X345ONNNLN 


R3910NA1NNO 
P2995915570N 
P59V812710 
P299914929N 
P5§9v416030 
P?29S9971544N 
PP 999953240 
P29S91 4HAN 
P59vV4142770 
P69Y2P1 &RAN 
P29S991271070 
P59V412H1N 
PHIV4S1IAPARD 
P59v414750 
P5OV41I&REN 
Q2R2ANNO3AN 
Xx3YPNANNANA 
UOSKNKR5720 
UA IRCES72AN 


TY 


ap 


A/R 


5964 
3640 
3525 
nNnNOt 
2016 
3525 
35625 
3525 
3625 
3825 
3825 
3525 
3525 
3825 
3625 
3525 
3625 
3525 
35625 
3525 
3825 
32525 
3525 
3825 
3730 


3910 
2939 
5964 
2939 
5964 
2939 
2°39 
72939 
5964 
6992 
2939 
5964 
5964 
5964 
5964 
2R 30 
3900 
0380 
Pied 


NFR?OO © 


M 


+ eo) 


moorsvrv0c0cIasoe0oqoq000q0 999590 


Oe er te ee le le lim ite Hee He ie ke ie ie Hi, |) 
ooo 0co00o0cooao9 927 90 900008 


rf 


oo 


ooo d2ca ag g00oao0o0oqg0o0oo0o0o°9o 90 


B/S 


3525 
N000 


N09 
3525 
4980 
5290 
54?0 
5440 
5590 
5600 
5740 
5750 
5760 
3040 
3050 
3110 
3120 
3140 
3190 
3200 
3210 


3220 © 


3240 
0000 


72100 
5570 
2710 
49?P0 
5030 
5640 
53640 
&660 
6270 
4830 
2100 
2610 
2680 
4750 
4R 60 


03300 


0000 
5720 
$720 


RASA INTERFACE WITH MOTS SYS,eM 


4 


Fe nl se ce in a ce ee cee cel ene a ee oe oe ee ne 


NAD OO wm > > ow oe oe et ed ot te ee ®t ot OC 


I 


Lo ©) 


pooo 9pvo0eco0o0o00 900 90 eo0 So 


aeaoo9adgqo00e0o0eocecvoo 9n.o0coe ce eoocse 


LINE 


0338 
1339 
0340 
0341 
0342 
0343 
0344 
0345 
0346 
0347 
0348 
0349 
0350 
0351 
0352 
0353 
0354 
0355 
0356 
0357 
02358 
0359 
0360 
0361 
03642 
0363 
0364 
0345 
0346 
0367 
0368 


0369 


0370 
0371 
037? 
0373 
0374 


0375 


0376 
0377 
0378 
0379 
0380 
O31 
038e 
O283 
0384 
0385 
O386 
0387 
0388 
N389 
0330 
0391 
0392 
02393 


10/11/71 PAGE 0007 


IMAGE 


a a a re er ee ee Se er a er Sr cr er ce Se Se a cae Se Se 2 Or Se Se Se a ar Sar ae | 
s 
DEVZR SET DEVICE CODE TO ZERO 


SKIP NEXT 


MC ZERO(1)sDEVCO 
BC #22015) 

ORG #25 

a | 
SEVNsDEVCD 
DEVCOs ACHR 
NEVCHs TAB2 
DE VCDs, VTABA 
NE VCD, VTAS1 
NE VCIie HALT 
DE VCs HALTL 
D& VCDs CRIN 
CEVCON,CRINI 
DE VCD,CRIN2 
DEVCN,ALFR™ 
DE VC» ALFRAL 
NE VCDs YAWA'T 
HE VCD, YAW 
DEVON, YAW? 
NEVCDs,YAWS3 
LREVCDs,YAWS 
DE VCDs YAWS 1 
CF VCRs YAWNbO 
DE VCDs YAWS 
¥(8) 


DE VCH 


NEVSV SET DEVICE CODE TO SEVEN 


BEGIN MOMIFYING INSTRUCTIONS 


MC 
SETWRT BC 


RETURN 
a a a a ee a a ee a ee Se a a ee Se Se Se a a or ar Sr Se Ce ae car Sar Sr Oe a ar Ser | 


ROUTINE TO RETURN MODIFIED INSTRUCTIONS TO NORMAL 


a a or or Se or ee Se Sr ee Se ar Se Sr ae ee ee See Se eS 2 a Se Oe 2 2 a 2) 


i 


NORML COMRS(20)sCOMTER BEGIN RESETTING INSTRUCTIONS 
FIVEsHLYSw 
ZERN( 1) FE SW 

FIVE »SPSW 

ZERN(1)2 CRSA 

FIVE »sHMSGSwe 

FIVE sCHSW 

FIVE »sREPSW 
ZERN(1),REPSW1 

Th Os RPS? 

FIVE sCOMTER 
ZERO(1)sSTOPSW 
7FERQO(1)9STAPSW 
7JERO(L Is DUITSW 
ZERO(L 2 QUATSW 
MURKY(160).330P 

¥(8) 
ENTER(S) sL STLNE(S) 
WKSTENISIsLSTLNE(S) 


MC 
MN 
MN 
MN 
MN 
My 
MN 
MN 
MN 
MN 
htN 
MN 
MN 
MN 
MN 
MC 
SETBK BC 
COMRS BC 
WKSTRS BC 
¥ 
ae mer ee ae ea ea a a a a a a a a a 
* 


RESET REPEAT SWITCH 


ALLQW S78 FOR COMMAND ENTRY 


RETURN PO TO NORMAL. 
RETURN 
NORMAL 


NORMAL 


BRANCHES 
NEV 7 S/R BRANCH 


SYSTEM TEN @..... 1! NFR200 © RASA INTERFACE WITH MOTS sysvem 10/21/71 PAGE 0008 


SEGe LOCN INSTR/DATA OP ASR MY BB mI LINE | IMAGE Cc 
2040 0394 ss SEARS CONSOLE CREDIT FILE UPDATE 
2045 0395 ¥# 
2050 0396 «* THIS ROUTINE wILt PERMIT OPERATOR CONSOLE ACCESS OF THF 
2055 0397 *»* MDOTS NEGATIVE CRENIT FILE FOR THE PURPOSE OF UPDATING 
2069 0338 »* THE FILE IN THE STORE> 
2065 0399 » : 
20670 04N0 «# COMMUNICATIONS MAY BE FROM EITHER DEVICE Os» OR DEVICE 7. 
2075 0401 # 
2080 0402 »* ERRORS AND OPERATOR MESSAGES WILL BE PRINTED ON THE 7102 
2085 ; 0403 -»* REGARDLESS OF THEIR ORIGIN»s AS THE REGULAR MESSAGE LOOP 
2090 —— O404 Aa PROVIDEN BY THE MOTS SYSTEM IS THE REPORTING AGENTeoee 
2095 0405 
21006 0406 * SERVICE REQUEST WILL RE IGNORED AFTER THE ROUTINE IS 
2105 : 0407 «# IN OPERATIONe 
2110 9408 *»* | 
2115 . 0409 8 B&B Bw RHR He HR HERR He REE KER He ERE Re Ree RHEE EFS 
2120 0410 *#* 
2125 3930 PUSS91447uN 14% 5349 0 6 4377C 10 #£$.O811 CIUPO C SPACEsPSFLAG TEST COMMUNICATIONS FLAG BUSY 
2130 3940 R3vVUNR&2AaN 11 39950 2 0 4240 § 0 0412 BC *™¢410(2) 2NOTAV(S) 
2135 3950 PTPAx15948 14 48028C 0 0 896% 1 ~*0 0413 C BLOKACsZERO TEST SYSTEM UP IF UP GO 
2140 3960 R3IYWNS42?PN 11 3970 20 &P20 § O 0414 BC *4#10(2)sNOTUP( 5S) IF NOT REPORT IT 
2145 0415 » 
2150 0416 *#* ALL CONDITIONS GO 
2155 0417 »& 
2160 3970 9796000330 OR 7060 141 90 0330 00 0418 MC BCUPDT(10)2330P 
2165 3980 R7970N21NN 08 7070 2 0 2100 00 0419 MC NOSR120) sCOMTER 
2170 3990 P297061454N O09 2015 00 &§40 1 0 0420 MN wHOM, IO! SEY DEVICE IN IO INSTS 
2175 8000 P29N81455N O09 2015 0 0 4550 1 0 0421 MN WHOM, 102 
2180 £010 P27N8145a8N 09 2N15 7 0 4880 1 0 0422 MN wHOMs, 103 
2185 4020 P29065146590 69 2015 00 4590 1 0 0423 MN WHOM, 104% 
2190 403Q P29R51441N 09 2015 ff O 4610 1 0 0424 MN WHOM, 105. 
21965 4080 P21N51462N 09 2015 00 &£620 i 6 0425 MN WHOM, IT06 
2200 4050 P§944148NAPV O88 5964 ff O 4N26C 1 O 0426 MC ZERO,EOQTFL 
2206 $060 P29391437w 08 2939 6 0 8377C : O 0427 MC FIVE»PSFLAG 
2210 £070 P733440N011 1&8 7336 40 0011 4 O 0428 MC ADPL»11P WRITE START MESSAGE ON CONSOLE 
2215 4086 V41tiv154530 11 4561 6 0 6530 § 0 0429 BC MSGE+1(6)s2WRTR(5) 
2220 | 0430 4 
2225 0431 & BEGIN PHASE SELECTION LOGIC 
2230 0432 #. 
22368 48090 P734aNeNN11 O08 7340 00 O011 4 0 0433 CILOOP NC ADOTINse11P REAID PHASE IDENTITY 
2240 4100 V4VP184570 11 4401 6 0 4870 § O 0434 BC ENTRY+1(6) »sRDER(5S) . 
2245 4110 PWPONA711R 14 7090 OO 7118 3 0 0435 C ADDs,NATINGS TEST PHASE AND TAKE PROPER 
2°50 4120 ReRVOHNNNND 11 4260 290 9000 00 0436 8C ADDSME (2) PATHe SET PHASE IDENTIFIER 
2255 4130 PWP9246711R 14 7093 00 7118 6 0 0437 C OFLETE s0ATINGD 
2260 481460 RawzxnaNnANnn 11 4780 20 0606 4 0 0438 BC DELS 16 (2) 
4150 POPPHONNANN 31 2N00 490 0000 900 0439 BC OP(0),0P(0) N‘e0P BUT HOLD CORE POSITTON 
$160 PoOFRPNNANAN 11 02000 990 0000 O90 0440 BC O@P(0)s,0P(0) NOQ@eJP RUT HOLO CORE POSITICN: 
2278 4170 Pw 20N832719R 14 7105 00 71318 30 0441 C EQUs DATING TEST FOR END OF JOR 
2°80 4180 R&TX¥NR4IION 114 46480 2 0 4190 &8 O 0442 BC FNLMSG(2)sINVOL(8) 
2285 4190 P732P84N011 O8 73208 od ONi1 4 0 0443 INVOL MC ADINVIILP. 
2290 04445 -& 
2295 0445 « INVALIN ENTRY FROM CONSOLE 
2300 N446 «# 
2305 4200 Véeiiv165§4530 11 4561 6 0 4530 § 0 0447 BC MNSGE 41 (6) eWRTRIS) PRINT INVALIO MESSAGE 
2310 4210 Uasrpyronoannn 1% 4090 § G6 ANDO AO 0448 B8C CYLOOP(S5) | ALLOW RE@ENTRY 
2315 , 0449 # 


#¥5 


{ { 

SYSTEM TEN ,&.. ER Y? NFR?200 @ RASA INTERFACE WITH MOTS SYSTE.. ioviis7i PAGE 0009 
SEQe LOCN INSTR/DATA OP A/SR MI BLS MI? LINE IMAGE C 
2320 " 0850 « SYSTEM NOT IN SYSUP CONDITION 
2325 0451 «* | 
2330 4220 P735760N11 OR 73252 00 0011 4& 6 0652 NOTUP MC ADUP.,11P 
2335 4230 U4iUNANNNNA 11 4510 § 0 0N00 OO 0 0453 BC oUTY(S) REPORT CONDITION 
2340 0454 -» 

23485 . 0455 « COMMUNICATIONS BUFFERS NOT AVALIASLE 
2350 ~ 0456 #* ° 
2355 42460 P734848N011 08 7348 00 0011 40 0457 NOTAV MC ADAVs1iP 
2360 4250 wUasinaannnn 11 46810 § 9 0000 00 0458 BC OUTY(S) - REPORT CONDITION 
2365 | 0459 »« 
2370 : 0460 » SET ACTION CODE FOR SELECTED PHASE 
2375 | 0461 » 
P3280 4260 P292917113 OR 2939 00 7113 10 0462 ADDSME MC FIVEsACT SET ACTION CODE FOR ADDITION 
2385 4270 Ussnannnno 11 4310 § 0 0000 00 0463 BC UPDAT (5) 
2399 4280 P699317113 Of 6993 00 7113 1 0 0464 DELSME MC THREE,ACT SET ACTION CODF FOR DELETION 
2395 8290 UssAnnnnnn 11 4310 § 0 0000 n 0 0665 BC UPDAT(5) 
*300 POPPNNOANNN 11 0000 60 0000 0.0 0466 BC OP(0)s0P(0) | N9-OP BUT HOLD CORE POSITION 
2405 O67 »# 
2810 | 0468 »* ENTRY FOR READING ACCOUNT NUMBERS LOOP 
2015 0469 *& 
2420 $310 PUYAH41118P 14 5964 Of 1180 1 9 0470 UPOAT C ZEROsCOMFLG TEST FOR COMMON BUFFER AVATLABLE 

2425 8370 R&SSORNANDN 11 4330 2 0 0300 80 0471 BC #410(2)sROX(8) 

2830 4330 P7346NaNN11 O08 7340 00 Ontt 4 0 0472 MC ADOTIN»11°P READ ACCOUNT NUMBER 
9635 $340 V4vP1654570 11 4601 6 0 4570 § 0 0473 BC ENTRY4+1(6) sRDER(5) 

440 4350 PUR683711R 14 5245 O 0 7118 3 0 0474 C E0PsMPATING TEST FOR END OF PHASE 
»oe¥5 436N Raetiinnnann 11 4450 2 0 0000 O00 0475 BC PHSEND(2) 

1250 &©370 PWwANESAZIIR 14 7105 O90 7118 30 0476 C EQUs DATING TEST FOR END OF JOB 
1®55 &#380 R&TxNN0NNN 11 4480 2 0 0000 0 0 0477 BC FNLMSG!I2) | 
186N . 0478 & . 

865 0879 « ASSUME ACCOUNT NUMBER ENTERED AT THIS POINT 
870 : 0480 »# 

675 #390 P71311713N0 O8 7131 Of 7130 10 Oa Ri MC DATIN¢16(1)»DATINGIS5 REPLACE CHECK WITH DISPLAY 
‘88M 44800 P7119277121 O08 7113 0 0 7131 20 0482 MC ACTsDATINO16 SET ACTION CODE 
35 4410 Q711RK811RxX 08 7118 1 0 1188C 5 O 0483 MC DATING 3(15) 2 COMBUF MOVE DATA TO COMMON BUFFER 
90 4820 R1?PNRV12NS OR 1202C 2 0 1703C 7 0 0484 MC COMBUF+14(27)sCOMBUF415 SET ASTERISK FILL ILLUSTOM 
#95 44830 P35051118P 08 3505 09 1180C 10 0485 MC ONEs COFFLG FLAG THE COMMON BUFFER ‘FIL? 
'5N0 444M xXOSPONNANNN 11 0300 8 0 0000 60 = 0486 BC ROX(8) SWING AROUND 
'505 . 0487 « 

519 0488 » END OF A PHASE ENTRY POINT 
515 1489 a 
‘520 4450 P733740011 O8 7332 00 0011 4&0 0590 PHSENO MC ADIMPES11P WRITE TEMPORARY MESSAGE 
‘525 8860 V4liviSe53N 11 4561 6 0 4530 § 0 0491 BC MSGE41(6)2adRTRIS) ; 

530 4870 xXaPyYnnNANN 11 4090 8&8 0 N000 Oo oO 0492 BC CILNOP(8) GO BACK FOR MORE 

535 | : 0493 * 

540 049% -& END OF JO ENTRY POINT 

545 . 0495 -« : 

559 4880 P350514802?v 08 3505 0 0 40246C 1 0 0496 FNLMSG MC ONESEOTFL END OF UPDATE*s REMODIFY THOSE. 

555 4490 P732464NN11 O08 7344 OO 0 001! 4 0 0497 MC ENDADDs11P INSTRUCTIONS CHANGED UPON FNTRY 

560 4500 V3VP15374N 11 3901 60 3740 § O 0498 BC SFTBK4+1(6) sNORML(5) AND EXITe 

565 4510 Vaiivi84530 11 4561 69 4530 5 0 0499 OUTY BC MSGE41(6)s,4RTRIS5) REPURT CONDITION 

570 #520 xosPnnnnan 11 0300 8 9 0000 00 0500 8C ROX(8) 

575 0501 #* 

589 O50? »# GENERAL. MESSA3E WRITER ROUTINE 

585 0503 = 

590 4530 SPOPNePOA1 13 0000 3 1 090021 4 0 0504 WRTR FN OP(301)221Pt4) REG 1 POINTS TO CHAR COUNT 

595 45490 051TN30NN1 O01 5140 0 0 000i 3-0 0505 101 Ww CR(IO0)s12(3) 


i, 


SEQe 


2600 
2605 
2610 
2615 
2620 
2625 
2630 
2635 
2640 
2665 
2650 
2655 
2669 
2665 
2670 
2675 
2680 
2685 
2690 
2695 
2700 
2705 
2710 
2715 
2720 
2725 
2730 
2735 
P74) 
2745 
2750 
2755 
2760 
2765 
2770 
2775 
27890 
2785 
2790 
2795 
28090 
P805 
2810 
P815 
P820 
2825 
P830 
2835 
2840 
P84&S 
?859 
285 
? 560 
2865 
?870 
2875 


LOCN 


4550 
4560 


4570 
4530 
4590 
4600 
610 
4620 
4630 


%640 
650 
8640 
4670 
&®630 
#690 
&70N 
4710 
&7?0 
&730 
&740 
4750 
&740 
4770 
4740 
#790 
&800 
#810 
&820 
4830 
#840 
4850 
4840 
4870 
48380 
4890 
4900 
4910 
4996 
4910 
4920 
49390 
4940 
4950 
4940 


SYSTEM TEN ASSEMBIER 


INSTRJOATA 


000P 3asPPNN 
RSiIVORSS4EN 


SPP NSP? 
051 T0N300N1 
00%031PPNN 
R&vPNNANNAN 
0517030001 
071SA5NNPS 
R&lxNR4590 


P§9V 4148755 
P59v414R65 
Us 4Sa0NnNHNnNA 
PRY94&470238 
RAVYNR STAN 
V6SV1569AN 
V6SV1R627PN 
P53V414R2IN 
us TANAAQNNN 
PV w9PVVXY?A 
V6ESQ1APAITN 
PHRWROANSAAN 
PT CNB&ENAL 


V6OTIEENSN 


1850626041 
V6NTIEAOSN 
PUR4&SSI7R7TS 
Raxsannann 
PUR&527795 
R51NACA572AN 
PWWIRASAGR 
V6SN12AH150 
P5WRONSH4N 
P§9A44N011 
P5 96440091 
PUS4917W95 
R5suAaaqaaNnN 


00n 

1T91NI49RP 
US4YSN68509N0 
P§9V41534N 
IT94N&NHP!S 
PVIQNK4NNP 1 
S4axyoaaooann 


A/R 


0003 
45860 


0000 
5140 
n003 
4400 
5140 
7136 
&580 


5964 
5964 
4730 
2996 
&4£90 
A261 
6261 
5964 
5410 
6792 
6311 
5720 
7006 
6141 
9506 
6141 
5245 
4830 
5245 
5410 
7795 
62311 
5720 
5964 
5964 
5249 
52350 
4906 
0001 
4910 
&930 
5964 
4940 
6106 
4290 


i q 
2 


QF 
NFR?P00 «© RASA INTERFACE WITH MOTS SYSTEM 


4 


0 
2 


NOONDOW 
ecCooOoOKO- 


VODDIMRIONVNIONGOOAWeKDIWIAIFOMO FOE VO WCSO 
ooa9o000 9000 000 00 99Ww5 99009000 


woeonrn- 
o00000 


I 


a/8S 


0000 
4540 


0021 
0001 


0000, 


oaon 
no0i 
0024 
4590 


4755 
#865 
0000 
7038 
&769 
6320 
6320 
4230 
9000 
6892 
6170 
4640 
606i 
6050 
6061 
6050 
7875 
0000 
7795 
5720 
5? 48 
6150 
&6H40 
0011 
one 
7735 
o0000 


on0ng3g 
4987 
5090 
5360 
Oooel 
aAneL 
onnod 


OM FFODVVVWOWMHWNFIVFAO-"NHIWHD-- 
Onovoo00000000O9CZD00OWD90ND90000000 


4 


5 
8 


oR WO we 


or & ~~ Uw 


if 


Oo 


goo 002900 


OoOoaonoso 


LINE 


0506 
0507 
0508 
0509 
0510 
O511 
0512 
0513 
O514 
0515 
0516 
0517 
0518 
0519 
0520 
OSe1 
0522 
0523 
of24 
0625 
0526 
0527 
0528 
0529 
0530 
9531 
0532 
05393 
0534 
06835 
536 
0537 
0538 
0539 
0540 
0541 
0542 
0543 
0544 
0545 
0546 
0547 
0548 
0549 
0550 
0551 
0552 
0553 
0554 
0555 
0556 
0457 
0558 
0559 
0560 
0561 


MOUSE 


QUITSW 
MOOSE 


RPSwe 


QUATSW 


AGAIN 


SPCNT 


SPSw 
CNTCH 


W 
BC 


3P(021)20P (S22) 
*™(2)27%301(8) 


GENERAL MESSAGE READER 


THIS MODULE WILL ACCESS A PRINT IMAGE FILE 


SPECIFIED BY AND ILL PRINT A REPORT 


OP (304)521P(4) 
CR(O)s1(3) 
3P (O01) eCP(1s2) 
(2) 
CRI(t0O)21(3) 


INVAL4#3(9)224(5) 


I03(2)s104(8) 


eo» e@*eeuenyneepe Pee Re HU MUR OHHH HEHE HA 


"ADR! 


10/11/71 PAGE 0010 
IMAGE 


REG 2 CONTAINS THE CHAR COUNT 
RETURN ON GOOO STATUS 


REG 1. POINTS TO CHAR COUNT 
READ JUST PAST CHARA COUNT 
RETURN ON GOND STATUS 
REPORT INVALID ENTRY 


REPEAT READ 


AT AN ADDRESS 
ON THE 


WORKSTATION AS DEVICE ZERD OR DEVICE SEVEN 


ZERONI(LISQUITSWSS 
ZERO (1s QUATSW 45 
MOUSE(5) 
ANRs STRSTP47 
#410(2)2MOOSE(S) 
INKe1(6),A9RS(5) 
INK41(6)sADRS(5) 
ZERO( Lo RPSw2 
VTAB(5) 
DN3(03)204(53) 
LINK@L1(6)ePRNTFL (2) 
LSTLNE(0),READ(O) 
LINEADs,READI +1 
RED141(6),D0SC(5) 
EIGHTsREAN141(3) 
RED1L14+1(6)20SC(5) 
EQPsLINE 89 
RPSW2(2) 
EOPs,LINE 
VTAR (2s LSTLNE (2) 
LINE (2)sSLASH 
LINK41(6),PRFLE(2) 
LSTLNE (9),READ(O) 
ZEROS( 9) aR1 
ZFROS( 4) aRP 
SPACE sLINE (22) 
SPC( 2) 

eed 
c3'o00! 

*( 1) 2CHCNT 
CNTCH(5),TASSP(5) 
ZEROS (LI sa CHSw 
*(1)2R2 
LNIIDsR2 

AGAIN( 3) 


TURN QUITSW OFF 

TURN QUATSh OFF 

SwITC4+ TURNED OFF IN REPRINT 
END OF REPRINT 

IS THIS THE LAST PaGE 

FAKE A OISC READ FOR ENP 

I’ TAKES TwO INCREMENTS 
TURN END OF PAGE SwlTCH OFF 
090 A VERTICAL TAB 

Esio OF TRIS FILE YET 

LintK ON FQUAL 

SwiTCe TURNED IN LIMK 

SFT FOR FIRST SECTOR 

BiuMP REAM’ INST TO SECOND RALF 
TEST FOR OUTeCFeSYNC PAGE 
GET BACK IN SYNC [IF OUT 

IS IT ENC OF PAGE 

E‘!ID OF PAGE SwITCw 

END OF FILE 

LINK IF EQUAL 

SwITCH TURNED IN LINK 


Is 1T A RLANK 
YES COUNT BLANKS 


SPACE COUNT 


NO COUNT CHARACTERS 
SPACE SWITCH 

NONP CHARACTER SwWLTCH 
REG2@ Tih NEXT CHARACTER 
NefN OF LINE? 

N‘) CHECK NEXT CHAR. 


* » %* 4+ H% BH HR HF 


= 


sS2 8 eesepeeaeeueepe peu epoue He 8 Beye eee ese ee Fs SF RBHR BR S 


SYSTEM TEN @... ER TY NFR200 © RASA INTERFACE WITH 10/11/71 PAGE 0011 


SEQ@- LOCN {ENSTR/NATA OP ASR ML BS MI LINE I4aGE c 
2880 .4976 P298915020 09 2939 00 5730 1 90 0562 MN FIVEsCRSW YES TURN ON CARRIAGE RETURN SW 
2885 8920 O77Y5SSPONN 01 7795 01 0000 5 0 0563 WCHR W LINE(02122015) WRITE PORTION OF LINE 

2890 4990 4987 0564 ORG #93 . 

2895 8987 000 0001 0003 0565 CHCNT OM C'too0! CHARACTER COUNT IN wRITE INST 
2900 4990 RS5©POR4S9RN 11 5N00 2 0 4980 8 0 0566 BC #410(2)5%210(8) 

2905 5000 P00?7160011 08 9021 00 06011 4 O 0567 MC R2eR1 © MOVE CHARACTER POINTER TO NExTf FLO 
2910 5010 P5968249R7F OB 5964 01 0 4987 320 0568 MC ZEROS(3) sCHCNT RESET CHARe COUNT 

2915 5020 P299691534N 09 72939 4 0 5260 1 0 0569 MN FIVE (1)2CHSW RESET CHARe SWITCH 

2920 50230 P5P7TN5537N 11 5040 00 5370 § 0 0570 CRSWw 8C CARRET(O)sCNTSP(5) TIME TO CARRIAGE RETURN 9 

2925 504nN PS9V415N230 09 596% 0 0 8030 1 0 0571 CARRET MN ZFROS(1)2CRSW RESET CARRIAGE RETURN SW 

2930 5050 P29591497?0N 09 2939 00 4920 1 0 0572 MN FIVE»SPSw RESeT SPACE Sw 

2935 5060 P53944232490K4 08 5964 0 0 4906 3 0 0573 MC ZEROS(3) eSPCNT RESET SPACE COUNT 

2949 5070 V5ww15574N 11 5771 6 0 5740 5§ 0 0574 BC CROUT4¢1(6) eCRIN(S) 

2945 SNORN x54xnNN|NNAN 11 §780 8&8 6 0000 00 0575 BC RITN(&) LEAVE ROUTINE 

2960 5090 PTYN62297%4— 14 4906 0 0 2936 3 0 0576 TABSP C  SPCNTI3) »04FOUR MORE THAN & SPACES 

2965 5190 SS ainnannnn 11 5150 3 0 0000 a0 0877 BC TAS8(3) N1 HORIZONTAL TAB 

23970 5110 3790434987 0% 4906 3 6 4987 20 0578 A SPCNT»CHCNT ADO SPACE CNT TO CHARACTER CNT 
29765 5120 P534424890h4 08 5964 10 4906 3 0 0579 MC ZEROS{(3)sSPCNT CLEAR SPACE CNT 

29RO 5130 U4sysannnnn 11 4930 5 090000 090- 0580 BC CNTCHI(5) GO TO COUNT CHARACTERS 

2985 5140 5135 0581 ORG #25 

2990 §135 RR2EP ono’ 0005 9582 RRREP OM CFRRREP! 

2995 Siac 000! oool 9583 CR OM CIM? CARRIAGE RETURN CONSTANT 

30697 5150 PTvN415964% 14 4906 06 0 5964 1 0 0584 TaB C SPCNT(1)eZEROS HOR:e TAB MORE THAN 100 

3005 516N RSR2xoNNNNN 11 5780 20 0000 00 0585 BC TAB1it2) N49 GO PO TAB 

3919 S170 PTYNAPSS4S 44 4906 0 0 5K45 2 O 0586 C SPCNT(2) sHTK CHECK FOR 100 AND 110 

3015 5180 Q652NnN2524N 11 5710 1 90 5230 7 0 0587 BC TAB1iN(1)sTABI1(2) 

30209 5190 PTYNAP5S4H 14 4906 0.0 5546 2 O 0588 C SPCNTI(2) sHTK+! CHECK FOR 120 AND 130 

39026 $200 R5R10N85270 11 5750 2 0 §270 § 0 0589 BC TAAL2(2)sTABLI3(§) 

3030 5210 P6594189N7 08 6096 00 £997 1 0 0590 TABL1O MC HTC(1)sSPCNT+L INSERT CHAR FOR 100 

3035 S22n uUSR2xaNnNNDN 11 5?80 § 0 0000 OO 0 0591 BC TaB1i(5) 

3050 5230 P6197189N7 OR 6097 4 0 4907 1 0 0592 TABL2 MC HTC4+111)e2SPCNT41 INSERT CHAR FOR 110 

3055 524M uUSRxNNNNNN 31 5280 8§ 6 0090 400 0593 BC TAB1(5) 

3060 5250 57245 0594 ORG #25 

3965 5245 ENP nn01 0n03 O895 ENP OM CrEOP! END NF PAGE FLAG 

3070 524R /¢s 0001 0002 ~~ 0536 SLASH OM Ctysat 

3075 5250 P609R14907 O88 6098 0 O 4907 1 O 0697 TABL2. MC HTC+?i1) sSPCNT +1 INSERT CHAR FOR 120 

398M §260 USRxNANANN 11 52780 § 0 0000 00 #£4220598 BC TAH1(59) 

3085 §270 5265 0599 ORG 425 

3090 §265 /6% 0001 0003 0600 VTCNT OM C'/66! VERTICAL TAB REGISTER LOAD 

3095 5268 K 0001 roleredy 0601 vTICTL OM CrK! VERTICAL TAB CONTROL 

3100 5769 n001 0001 0602 CTi Om C1 

3108 5270 P6n99t149N7 OR 6099 0 0 4907 1 0 0603 TAB13 MC RYTC+3(1) eSPCNT 41 INSERT CHAR FOR 130 

3119 5220 P&907253246 08 4907 0 0 5346 ? 0 0604 TaABi MC SPCNT4#1(2) 0HT#1 MOVE SPACE COUNT TO TAR INSTe 
3118 8290 7537T8aNNNS 01 §23245 70 000 30 04605 TAB2 W HTI(7)04(3) DO HORIZONTAL TAB 

32120 5300 RSSANRS29N 11 5310 2 0 §290 8&8 O 0606 BC #410(2)5%"10(8) 

3125 5319 £5 348246909hH OR 8964 OO 0 4906 3 0 0607 MC ZEROS(3)sSPCNT CLEAR SPACE COUNT AFTER TAA 
3139 5370 P0O92P140N11 OF COAL 0 0 0011 4 0 0608 MC RP RL MOVE CHAR POINTER TO NEXT FIFLA 
3135 5330 P29991499N 09 2939 4 0 4920 1 0 0609 MN FIVEsSPSW StYT SPACE Sw ON 
3140 5349 Usrysnnnnnn 11 4930 8 0 0000 O60 0610 BC CNTCH(5) G) TO COUNT CHARACTERS 

3145 5350 5345 0611 ORG ¥~5 

3160 8345 e001 An01 0004 0612 HT OM CreQo!rt HORIZINTAL TAB REG LOAD AND GCNTL 
31565 5349 0001 onot M613 SPACE ODM CI ! CONSTANT SLANK 

3169 53509 1025034904 04 5350 141 06 4906 30 0614 SPC A #(1)sSPCNT CUNT ALANK 

9165 5360 U5SH0549RN 11 5370 § 0 4980 § 0 0615 CHSw BC CNTSP(5)sWCHRIS) CHARACTER SWITCH 

3179 5370 P59v41k292N 49 6964 0 9 4920 1 0 0616 CNTSP MN ZEROS(1)eSPSH SET SPACE SWITCH ON 

3175 5380 L1URRNSNN!1 O48 §380 1 0. & 0 0617 A «#(t)2Re CHAR POINTER TO NEXT CHAR 


on 


am 


f ¢ é 
( if 


~~ 


SYSTEM TEN ASSEMBLER Y1 NFR200 © RBSA INTERFACE WITH MOTS SYSTEM 10/11/71 PAGE 0012 


SEQe LOCN INSTR/DATA OP ASR MY BSS MI LINE. IMAGE c 
3180 58390 PVv90640N71 14 4106 00 002% 4 O 0618 C LNNDsR2 END OF LINE ? 

3185 54N0 S&xXYNKSN4N 11 4890 3 0 5040 § 0 0619 BC &GAIN(3)sCARRET(S) ~ NOs NEXT CHARe ELSE CRe 
3190 5410 V5wwtS5740 11 5771 6 0 5740 5 0 0620 vTAB BC CROUT+1(6)sCRIN(5) 

3195 5470 757?vR3NNN1 01 52?6R 7 0 0001 3 0 0621 VTABA W  VTCTL(7)}9113) TAB TO TOP OF FORM 

3200 $430 RSTTHRS&2N 113 5440 2 0 5820 8 O 0622 BC 4410(2)2 491018) 

3205 5440 O5?v8239N0N3A 01 5765 O 0 0003 30 £0623 \VTAB1 W VTCNT(0)23(3) RELOAD VTYAB REGISTER 

3210 5450 RSTVNRS&4N 11 5460 2 0 5440 8 0 0624 BC #4+10(2)2%#10(8) 

3215 5460 PUvV746?446 14 5676 0 0 2446 40 0625 ANYMSG C MSGPT1sMSGPT2 ANY MESSAGES TO PRINT 
3220 5470 S5TxN5555N 11 5480 3 0 5550 50 0626 BC ¥#4+10(3)sRSTMSG(5) TO RESET MESSAGE INST IF NOY 
3225 5480 PS§9V81544N 09 5964 O 0 5640 1:0 0627 MN ZERO(1).s4SGSW  JURN MESSAGE SWITCH ON 
3230 5490 P?2P4Th65511 09 Pek 0 0 55114 4 O 0628 MN MSGPT2sWRIMSG+1 SET INST ADDRESS 

3235 5500 O817TN3N|N1 O01 5140 090 0001 3 0 0629 W CR(O)s1(3) | 

3280 5510 079W88NNP7 01 7975 0 0 0027 5 0 0630 WwWRTIMSG W MSSTAB(0)1227(5) WRITE MESSAGE 

3245 5520 RS5i1SOR55NO 11 5530 ? 0 55800 RO 0631 BC #410(2)s¥-20(8) 

39250 5530 2US4&R&PL46 N& 5H4R 20 2446 4 O 0632 A MSGBP,MSGPTe BUMP TO KEXxT SLOT 

2255 5540 USTVONNDNNO 11 5460 5 0 0000 00 0633 BC ANYMSGI5) G9 BACK FOR MORE 

3260 5550 5545 0634 ORG #5 

3265 5545 112 0001 0003 0635 HTK OM criies | HORIZONTAL TAB COUNT 

3270 5588 27 0n01 0002 0636 MSGBP OM C27! 

3275 5550 P24AhaSh7h O8 2466 0 0 5676 40 0637 RSTMSG MC TABRSTsMSGPT1 RESET TABLING POINTERS 
3280 5560 P2?4h64?es6 OR 2866 0 0 2446 4 0 0638 MC TABRSTsMSGPT2 

3285 5570 UWSvTONHNND 11 56440 & 0 0000 00 0639 HLTSW 8C MSGSW(5) GQ TO MESSAGE SWITCH IF OFF 
3290 55820 P29984751R 08 2994 0 0 7518 60 0640 MC ADRs HLINSG+12 REPORT LAST AODRESS 

3295 5590 0517030001 01 5146 6 060 0001 30 064% WALT W CRIO}s1t3) 

3300 5600 775P4800850 01 7606 7 0 0050 5 0 0642 WHALTL W HLTMSG(7)s50(5) WRITE HALT MESSAGE 

3305 5610 RSvRNRS59N 11 5620 2.0 5590 8 0 0643 BC #41012) sHALT(8) 

3310 5670 v3vYP1R374N 11 3901 6 0 3740 80 0644 BC SETBK+1(6)sNORML(8) RESET MODIFIED INSTRUCTIONS 
3315 5630 xKOsPQANN|NNN 11 0300 8 0 0000 900 0645 BC ROX(8) RETURN TO MOTS | 

3320 5640 xSuxnnnnaN 11 5780 8 0 0000 Oo 6 0646 MSGSW BC RITN(8) LEAVE ROUTINE IF ON 

3325 5650 P29991568fN 09 2939 0 0 5640 1 0 0647 MN FIVE sNSGSW TURN SWITCH OFF 

3339 5660 uUSTANNNONDN 11 6410 § 0 0000 00 OH48 '  . BC vTABIs) @9 TO TOP OF PAGE 

3335 5670 ROI2W77975 OB 0327C 2 0 7975 +70 0649 TBLMSG MC MSGQ(27)sMSGTAB TABLE MESSAGE 

3349 56R0 5476 0650 ORG 4-4 

33465 5674 7975 0001 0004 0651 MSGPT1 OM A'MSGTAA! 

3350 56RO RO22V703PW OF 03226C 2 09327070 #2420652 MC FREE (27) »MSG9 CLEAR MSGO 

3355 5690 2U5488547h 04 §548 2 0 5676 40 0653 . - B&B MSGBPs,TBLMSG+6(4) BumP INST TO NEXT SLOT 
3360 5700 PRIRAS5A7TH 14 24686 0 0 5676 4 O 0654 C MSGLM» TBLMSG+6 TEST FOR MORE ROOM 

3365 5710 SSa4xnnnnnn 11 5780 3 0 0000 00 0655 BC RITN(3) LEAVE ROUTINE IF THERE IS 
3370 5720 P59v4158570 09 5964 06 0 5570 1 90 0656 LSTLNE MN ZERO(1i)sHLTSH TURN HALT SWITCH ON 

3375 5730 uUS5TANnAANAN 11 §410 8 9 6000 00 


0657 BC VTAB(5) D9 VERTICAL TAB ROUTINE 
3380 0658 #4 7 : 


3385 5740 O873T968NN0N1 O01 5349 0106 0001 § 0 0659 CRIN W SPACE(0)21(5) 

3390 $750 7517030001 01 5140 70 0001 30 0660 CRINi W CRI(7)51(93) SP CR SP SEQUENCE 

3395 5760 7837T96NNN1 O1 5349 70 0001 § 0 0661 CRIN@ WwW SPACE(7)21(5) 

3400 §770 judPPOGoNAAN 11 0000 § 0 0n00 10 0662 CROUT BC O15) 

3405 0663 * 

3410 5780 US4xNNNNNN 11 §780 8§ 0 0n00 0 0 066% RITN BC *( 5} RETURN FROM WRITE ROUTINE 

3415 0465 * . 

3420 0666 4 * & © ¥ we eRHe BHeR BRE KRERE HEHE HH HEU HEDULUHUCUHhMUhHMhUhFS FRE HR EH SF 
3425 Q6467 ‘ 

3430 , 0468 * PREPARE TO ROLL IN THE FIRST MOOULE OF THE TOTALS PROGRAM 
3435 0669 » 

3440 . 0670 8s © 8 & 2 es & He He HR HR KR BR HR HR HM Re RE HR HR RR He HR HR ME HE EH HR FB 
3445 0671 * F 

3450 8790 P§96441701N O8 5964 6 0 7010 i 90 0672 ROLLER MC ZFRO(1)eCNT ZERO RETRY COUNTER 


3455 $800 POPANPPPPN 000% 6010 0473 OM CHPOPNOPPPPDS! SET INHTAYT SWITCH MONE 


a 


SYSTEM ren Deena: ER 


SEQ. 


3460: 
3465 
3470 
3475 
3489 
3485 
3490 
34958 
3500 
3505 
3510 
3515 
3520 
3525 
3539 
3535 
3549 
3585 
3550 
3555 
3560 
3565 
3570 
35975 
358”n 
3585 
3590 
3595 
3600 
3605 
3610 
3615 
3620 
3625 
3630 
3635 
36480 
3645 
3659 
3655 
3660 
3665 
3670 


LOCN 


5810 
5820 
5830 
5840 
5850 
5860 
5870 
S8Rn 
SR90 
5900 
5910 
5970 
5930 
5940 
5950 
5960 


6970 


5964 


5964 


5970 


5980 
$990 
6000 
6010 
6020 
6014 
60279 
6030 
60406 
6050 
6044 


3675 | 


3686 
3685 
3690 
3695 
3700 
3705 
3710 
3715 
3720 
3725 
3730 
3735 


6050 
6060 
6070 


6080 . 


6090 
6100 
6096 
6100 
6110 
6196 


6110 


INSTR/DATA 


V6PS1655970 
QSR40NNNNN 
P7 586400786 
UOPVNSSRS5N 
osi1Troasaant 
P39?P5476N6 
O7SUASNORS 
RSXYNSSRIN 
10290147019 
TH VANSSRINO 
051TN3INNN1 
POSASATA4S? 
O74TNKNN77 
R5v1jNS 5930 
P7I524704A 
uSx Ianannn 


o0nnnn 


0ONDONAN SS 
R6PR015970 
O51 To3nNnnN1 
OF 7ATENN SS 
uéPQAnananNn 


NO0NdNs 

oTem Rolelar ab i) 
RGEPSN1ANAN 
uSvyYaqanann 


009003 


P596615269 
0779897994 
R6NS01 6100 
V6SV15ARAN 
vaevannnnn 


33<z . 
TePpvananann 


0132 
iv11015269 


08 
00 
11 
11 
11 


11 


04 
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Wwooansd monwvwovooo Fre nv 3BoO0ONR-® 


"“@0000 


werwvoand 
oo 0c 0 


ano 
o00 


I 


9oae0q0qog00o0qo g0 0e0ceg0 90900 


8/S 


5970 
0000 
0025 
5850 
0001 
7696 
0084 
5870 
710 
5810 
0001 
7647 
0077 
5930 
7046 
0000 


oo00o0t 
0006 


6044 
5970 
0001 
0044 
0000 


0006 
6014 
6020 
0000 


0006 


5269 
2994 
6100 
6320 
N000 


0004 
0000 


0004 
5269 


m 


oO MWwW-o 
ooa00 8 


Om 2 


oN DBD 


OF UIP WAMKM AAKPWMHPOW 
mo0o0oqg 0 "ay 070e Qqocooooooso 


1 


ooo 


oOo 0 00 


LINE 


0674 
0675 
0676 
0677 
0678 
0679 
0680 
0681 
0682 
0683 


0684 


0685 
0686 
0687 
0688 
06489 
0469¢ 
0691 
0692 
0693 
0494 
0695 
0696 
0697 
0698 
0699 
0700 
0701 
0702 
0703 
0794 
0705 
706 
0797 
0708 


0709 


0710 
0711 
0712 
0713 
0714 
0715 
0716 
0717 
0718 
0719 
0720 
0721 
0722 
0723 
0724 
0725 
0726 
0727 
0728 
0729 


RETRY 


ERXBR 
ERXIT 


ZERO 
ZEROS 
s 


SADDLE +1(6})s5sB00TSN(5) 
ERXBR(10)s5P 
BOSS se5P 
60P(5),ERXIT(S) 
W CR(N)21(3) 
25P(46)sPROC3B4i1 
W PROC3A(0)s84(58) 
¥™4¢10(2)54=10(5) 
A ae, CNT 

+1014) ,RETRY(5S) 
Ww CRI0),1(3) 

PHP (6) 2PRNC4A47 
W PROC4A(0)277(5) 
¥410(2)2 021015) 
MONTSSRsROSS 
RETRY(5) 


‘DM C!007090! 


10/11/71 PAGE 0013 


IMAGE 


RETRIEVE OMF BOOTSTR4APS 

SET POSITION O FUR ExIT 

SET CONTROLLER TO LUADER 
LOADER EXIT 

CARRIAGE RETURN 

MOVE “4QCOULE NAME TO MESSAGE 
PQINT ERROR MESSAGE 


IXCR RETRY COUNT 

AFTER 10 UNSUCCESSFUL ATTEMPTS TO 
LOAD THE DESIRED MOOULEs FKXECUTE 
MOVE MODULE NAME TO MESSAGE 

A CARRIAGE RETURN & PRIAT FROOR 


DEFAULT TO MNTS PROGRAM 
TRY T9 LCAN AGAIN 


* e@ SB ee ewe eEemUrUHDmMUARDUCUF BRFSS FR SR HE Ze HRS EERE SB 


a 

& 

* 600 
s 

a» % & 
m 


BOOTSN 


BOOTER 


SEC4 
NXBT 
SADDLE 


Sec3 
* 


¥ 
x 
a 
s 


TSN/SADOLE 


LOAD LOW CORE SOOTSTRAPS FROM OISC 


es eee es BR HK HR BH HR RH He HR HR HE RHR BR BH KH HY BR BR SF 


R OP(0),SEC3(0) 
BC NxBT(2)sB00TSNI1) 
Ww CR(0),1(3) 

Ww BOOTAB(0)s44(5) 
BC *(§) 

ORG #6 

OM c'000904' 

R 1C0OP(O)sSEC4(0) 
BC #(2)eNXBT(1) 

BC BONTER(S) 

ORG 426 

Om c'00N003' 


READ FIRST MALE OF LOK CORE 
FAULT OR PARITYs RETRY 

FLAGGED SECTORs yYOoU'RE SOL 
WRITE ABORT MESSAGE 

WAIT FOR OPERATOR ItiTERVENTION 


READ SECCND HALF 
GOOD RETURNe FAULT/PARITY: PETRY 
FLAGGED SECTORs YOu'RE SCL 


»eeRR eR He He HR HR HR HEHE RHR HR HE ERE H EHR HE SHR HEHE HEHEHE 


READ ONE SECTOR FROM THE DISC. 


a a Se ar a ee er er a a er Or Sr Oe Sr a Oe Sr Sr 2 Sr Se Sr Or Sr Sr 2 ee Sr Se 


ry 
Osc 
READI 
BLIMP 
HTC 
PSPR_ 


LAND 


ZEROS(1)eCT1 

R VOIDBF(I(QO)s,ADR(0) 
OKG(2)sPSPR(1) 
INK41(6)sADRS(5) 
READ1(9) 

ORG #24 

OM Chiscs! 

BC READI( 4) 

ORG #=%4 

DM C'o1se? 

A ¥,CT1 


SET RETRY ROUNTER 

@ READ A SECTOR 

TEST STATUS 

INCREMENT wITH WRAPAROUND 
READ THE NEXT 


HORYZONTAL TAB CHARACTER 


RETURN ON FAULT 


CONSTANT FOR ENO OF LINE 


CMINT PARITY 


SYSYEN TEN @.... FR 


SEQ-> 


3740. 


3745 
37580 
3755 
3769 
3765 
3770 
3775 
3780 
3785 
3790 
3735 
3800 
3805 
3810 
3815 
3820 
3825 
3839 
3835 
3840 


3845 
3850 
3855 
336N 
3865 
3870 
38375 
38890 
3885 
3890 
3895 
3900 
3905 
3910 
3915 
2920 
3925 
3930 
3935 
3940 
3945 
3959 
3995 
3960 
1965 
3970 
3975 
1980 
1985 
990 
1995 
'000 


LOCN 


6120 
6130 
6140 
6150 
6145 


6150 
61690 
61790 
6180 
6190 
6290 
6210 
62270 
6230 
6240 
4250 
6240 
6270 
6220 
6290 
63900 
6310 


6370 
6330 
6340 
6350 
6360 


6370 
6380 
6390 
6400 
6410 
6420 
6430 
644 
6450 
6460 
6470 
64465 


6470 
6430 
6490 
6500 


INSTR/NATA 


TOPXNR ADNAN 
V6SV1ISARPN 
YsQTOANANDN 


RRERN 


P?2?99844XxXYP 
P2994h4WYA 
PPP318A99K 
T6EQnqnannng 
1V9988N021 
P679PVR9A 
P6791 86224 
1R9394647 36 
P239S9914755 
ue sannnann 
P63N146627464 
P29S5914750 
Pes InananaNn 
V6-ITISAS5IN 


Q6560N6390 | 


VATTIR6I70 
vesanannnnn 


1V37PNKh7P994 
PRYQ&AAVY?P 
S6SUNS434N 
P6S9AVRO94 
vesvoanaann 


QU9IVS400N11 
P6E5R 4644580 
O65Y PNVSERN 
R6&™S016390 
1V41NK65R0 
U6SYHANNNN 
PPP1?16445 
Terranonana 
1v45n2nnt4 
U6TanBN0N0N 


3 


QN655NNK439N 
V6TTIRARI7IO 
06546006390 
U6BLIPNOHOANNN 


08 
11 
08 
11 


BgR 


6086 
A261 
6140 
6145 
0no% 


2994 
2994 
0031 
6750 
4995 


4792 


6211 
2939 
2939 
6310 
6311 
2939 
6310 
6541 
6560 
baat 
6310 


6320 
2994 
6350 
6592 
6360 


5964 
65 86 
6592 
6430 
6410 
6390 
onie2 
6440 
6450 
6410 
6465 
0001 


6550 
4441 
6560 
6500 
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me frou yoo - mow Oo = 


at > OR ee 
oo o0 


i 


0 
0 
0) 


ooo0oo0ccnaoo0oowo0oao0oeo 


owoo9od 


eo0co0ooor a0 


6/S — 


6060 
6320 
9000 


0005 


6892 
6732 
6996 
0n00 
0031 


e994 


6°36 
6°36 
4755 
0000 
6? 66 
4750 
N009 
6510 
63930 
6370 
0090 


299% 
6692 
6360 
2994 
0000 


ooit 
6580 
6580 
6390 
6580 
9000 
6465 
0n00 
on4i 
0000 


oo0ot 


6330 
6370 
6390 
n000 


4 


9 FS 
ooo 


ONO NS FORM FHP FOF RDH 


OP Me WH 


ONO WO FY” Of $ 
eo Re Re He ie ie i= ie ie Ke. 


2090 9 
oo o0 


t 


oc ows 


ooo0ocoeooeo0oso0qco Www 


LINE 


0730 
0731 
0732 
0733 
0734 
0735 


0736 


0737 
0738 
0739 
0740 
0741 
0742 
0743 
0744 
0745 
0746 
0747 
0748 
0749 
9750 
0751 
0752 
0753 
0754 
0755 
0756 
0757 
0758 
0759 
0760 
0761 
0762 
0763 
0764 
0765 
0766 
0767 
0768 
0769 
0770 
0771 
077? 
0773 
0774 
0775 
0776 
0777 
0778 
0779 
0780 
0781 
078? 
0783 
0784 
0785 


PRFLE 


PRNTFL 


LETSGO 


REPSW1 


INK 


STATAB 
PUTTR 
BMPR 


WHONXT 
PUTOUT 


HOWMNY 
¥ 
*% 
% 
STATBL 


GETIN 
"3 


8C BMPRI5) 
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IMAGE 
RETRY 10 TIMES 


INCREMENT KITH WRAPAROUND 
RETURN TO CALLER 


BC BLIMP(4),READI(5S) 
BC INK+1(6)sADRS(5) 
BC #(§5) 

ORG #25 

DM C'RRPRN! 


PROVIDE LINKAGE TO OTHER PRINT FILES 


INSURE EQUAL ADDRESSES 

SET THIS ANDRESS FOR NEXT REPORT 
Is THIS THE LAST REPORT 

OUT IF YES (CC 4 MEANS # AP >) 
BUMP TO NEXT FILE 

SET TD NEW FILE START 

GET RETUSPN ADDRESS 

BiyMP TO SECOND PART OF SWITCH 
TURN SECOND PART ON 

RETURN 

GET RETUPN ALDRESS 

THRN FIPST PARY OF SWITCH GON 
AROUND YF REPRINT 


MC ADR» D419 3) 

MC ANRs03103) 

C R3eLSTFLE 

BC LETSGOI4) 

A SIXs,3 

MC 03(623)2 ADR 

MN LINK4114)5%+26 
A FIVE s*+16(4) 
MN FIVE sQUITSW+5 
BC LINKI5) 

MN LINK4+1(4)54416 
MN FIVE sQUITSW 

BC LINKIO) GO 
BC POSTN+1(6) sHEAD( §) 

MC RELPUT(10) 2°PUTTR 

BC PUTOUT+4+1(6)sSTATAB(S5) 
BC #(5) 


WRITE STATUS TABLE 
RETURN 


INCREMENT CURRENT PRINT FILE ANDORESS WITH WRAPAROUND 


A *y ADR BUMP ADDRESS 

C ADRs D2(s3) AT PHYSICAL ENG 

BC #410(3)e INK(5) OT IF NOT 

MC BD1(629)2AD8 RESET TO BEGINNING IF YES 
BC (5) RETR"! 


THIS ROUTINE WRITES THE STATUS TASLE ON THE KROME TRACK 


POINT REGISTER TO FIRST CF TABLE 
INITIALIZE OTSC ADDRESS 


FN ZERN(1)211P(4) 

MC HOMADE s WHERE 

W GRSYS1(001)sWHERE(O) 
BC WHONXT(2),PUTTRID) 

A BeAHERS 


RETRY PARITY OR FAULT 
BUMP .TO HEXT SECTOR 


BC PUTTRIS) TRY IT 
C 12P(1) sHOWMNY TEST FOR ALL 
BC (4) RETURN IF ALL» NEXT IF NNT 


RuMP POI TER TO NEXT PART 
GN BUMP ADONRESS 


A #sli Pie) 


ORG «e5 

OM Cr3! 

THIS ROUTINE READS THE STATUS TABLE 
MC GETTR(10),PUTTR MAKE PUY ROUTINE A GET 
AC PUTO!IT4+1(6)eSTATAB(S) 


MC RELPUT(10).PiTTR 
BC #(5) 


PUT PUTTR RACK TO NORMAL 


SYSTEM ren ener ER tI NFR200 ©@ RASA INTERFACE WITH MOTS §S 10/11/71 PAGE 900185 
SEQ@e LOCN INSTR/DATA OP A/R 4 Y B/S HI LINE IMAGE Cc 
0786 » THIS ROUTINE POSITIONS THE DISC HEAD ON TRACK 200 PRIOR TO 
0787 « WRITING THE STATUS SECTORS 
0788 -# 
6510 P6&4hs5inhnsa 08 46465 10 0004 1 =0 0789 HEAD MC HOWMNYs4P SET LIMIT FOR ONE READ 
6520 Q657NN4390 NB 6570 1 0 6390 00 0790 MC TRACKR(10) sPUTTR MOOTFY Y70 ROUTINE 
6530 V6TT1546390N 11 46441 46 0 6390 § 0 0791 BC PUTOUT41(6)sPUTTRIS5) DA wwe NISC READ 
6540 UséuTONANAN 11 6540 8§ 00000 00 0792 POSTN BC #15} RETURN 
6550 | 4545 0793 ORG #e5 
0794 s 
0795 *»* REPLACEMENT INSTRUCTIONS FOR STATUS TABLE DISC I/0 ROUTINE 
; 0796 »& 
8008 6550 0659P0V5R0 00 46892 0 1 6580 0 0 0797 GETTR R GRSYS1(091)sWHERE(O) 
&®01N 6540 O65Y?2NVSERON 01 46592 0 1 6580 090 0798 RELPUT W GRSYS1(001)sWHERE(0) 
6570 O9?PN0N6SR4 00 0200 OO 0 6586 OO 0 07939 TRACKR R 200P1(0)sHOMADE (0) 
#015 6580 ONO 0006 7 O800 WHERE OM C6 
802N 6586 000700 0001 0006 0801 HOMADE OM C!000200! HOME TRACK FOR ARP PROGRAMS 
4025 0802 so 2-2 e BSB eeEHeUMCU FLU FF FH RRR KA HHKRHR BHA HS HR HSH HR HH BS BD 
4030 ORg03 »& 
4035 0804 -s AUCIT REPORT STATUS TABLE 
&040 0805 
&045 OR06 * THE FOLLOWING TABLE CONTAINS UPPER AND LOWER LIMITS FOR THE 
8050 0807 -» DISC FILESe EACH MODULE LABELS ITS GQWN LIMITS AND LEFAVFS 
8055 OR08 THE OTHER FIELDS UNLASLEDe WO MNDULE MAY DEFINE A CONSTANT 
&060 0809 -s IN THIS TABLEe THIS TABLE IS RETRIEVED FROM OISC BY THE 
8065 OR1C » CONTROLLER AT THE BEGINNING OF A REPORT RUMs UPDATED 
4070 O8ii 4% BY EACH MODULE OURING ITS RUN AS NECESSARY AND WRITTEN TO 
#075 ; — O812 » THE OCISC BY THE CONTROLLER AT THE END OF EACH MCOULE> 
4080 . O813 « 
&085 2, nar . ; 0214 ss © © 8 © ee Ree we eRe ER KR HR HE KR HR RHEE BH BRR BR RS 
£090 0815 #* 
4095 6592 | ere 0000 01600 0816 GRSYSi OM 0C109! * FIRST SECTOR OF THE TABLE 
#100 659A 0001 - 0006 O817 O11 OM C6 102 DAILY PRINT IMAGE BEGINNING ADORESS 
8105 6598 . on01 6On06 Oogi&s Wi DM C6 103. WEEKLY PRINT INAGE REGINNING ADDPESS 
8110 6606 | 0n01 0006 0a819 Mi OM Cé 10% MONTHLY PRINT IMAGE BEGINNING AGORFSS 
#115 6610 ae 0001 0006 0820 OM C6 195 WORK FILE SEGIN ADNFESS 
4120 6614 on01 0006 Z Oke i DM Cé 104 ERRNO? FILE BEGIN AALRESS 
8125 6672 2 ON01. 0006 O82e2 DM C6 107 YESTERNAY'S ENDING TRANSACTION FILE BEGIN 
4130 6628 nN01 0nN6 0823 Dit C6 1048 REGISTER REPORT TOTAL FILE BEGIN ADMRESS 
®135 6634 . o001 0006 ORC4 OM C6 109 COMMON WORK FILE START ADDRESS 
#140 6640 nno01 0006 : 0825 OM C6 119 NAILY OIVISION TABLE START AQOKESS 
145 6646 | | 0n01 — 0006 0826 “OM C6 111 DAILY ACCOUNT TASLE START ADDRESS 
#159 6652 nn014 0006 ORe7 DM C6 112 MONTHLY AIVISTON TARPLE START ADDRESS 
4155 6658 ono. N006 OR 28 DM C6 113 MONTHLY ACCOUNT TABLE START ADDRESS 
160 6666 and! 0006 0829 BATCHS OM CG 114 BATCH TOTALS FILE BEGIN ANDRESS 
4165 6670 0001 0006 0830 DM C6 115 EMPLOYE SALES HEANEF ADDRESS 
8170 6676 ono1 0006 0831 DM C6 116 CASHIER PEPORT FILE START ACOFESS 
4175 64682 0001 0002 0&32 DM Ce 117 SECTOP COUNT OF ACCOUNT NUMBERS 
4180 668% ano1 oont 0833 OM Ci a © STORE TYPE FLAG(1#®FIILL »sOsPART) 
4185 6685 0001 n001 0834 RPTFLG DM Ci 119 WEEK END EMPLOYE SALE PRINT FLAG 
4190 6686 ono Ono! 0235 OM Ci 120 MONT4 END SALES PRINT FLAG 
#195 6687 noo! No0Nn5 08 36 DM C5 
&200 669? nno00 0100 O&837 GRSYS2 0” o¢c100F ? SECOND SECTOR OF THE TABLE 
&205 669? 0001 On06 OR38&8 N2 OM Cé 20e DAILY PRINT [MAGE END ADDRESS 
&210 6698 0001 ON046 0839 We DM Cé e203 WEEKLY PRINT IMAGE END ADDRESS 
&215 6704 nno1 0006 OR40 Me DM C4 204 MONTHLY PRINT IMAGE END ADDRESS 


4220 6710 0n0o1 0006 OR 4} DM C& 205 WORK FILE END ADDRESS 


SYSTEM TEN @.. ER IY NFR200 e 


19/11/71 PAGE 0016 
SEGe LOCN INSTRsDATA OP ASR MY B/S -M YX LINE IMAGE C 
&225 67146 0001 0006 0842 OM C6 206 ERROR FILE ENC ADDRESS 
&#230 677° 0n0i 0006 0843 DM C6 207 YESTERDAY'S ENOING TRANSACTION FILE LImrTtT 
&235 6728 ono! 0006 0844 OM C6 208 REGISTER REPORT TOTAL FILE END ADOFESS 
4240 6736 nn01 0006 0845 QM C6 209 COMMON WORK FILE ENP ADDRESS 
&@245 6740 0001 0006 0846 | OM C6 219 DAILY DIVISION TABLE END ADDRESS 
&®250 6746 nn01 0006 : 0847 ~ OM C6 e1i DAILY ACCOUNT TASLE ERO ANDORESS 
4255 6752 NOO1 0C06 OR48 OM C6 212 MONTHLY SIVISIUON TABLE END ADDRESS 
8260 6758 0001 0006 0849 DM C6 ' 213 MONTHLY ACCOUNT TAStE ENO AOORESS 
8265 6744 0001 0006 OR50 BATCHE OM Cé 214 BATCH TOTALS FILE ED ANNRESS 
4270 6770 onoi 0006 OR8Si OM C6 215 DIVISION TABLE ADNMRESS 
&275 6776 oooi . 0006 0852 DM C6 216 ACCOUNT TABLE ADDRESS 
&280 6782 n001 0002 0853 DM Ce 217 ACCOUNT NUMBER AREA COOE 
4285 6724 0001 0008 O854& DATE DOM C8 218 DATE 
4290 6792 ° 0000 0100 ' 60855 GRSYS3 0m nc100' ! THIRD SECTOR OF THE TABLE 
8295 6792 andt 0006 0256 D3 OM Cé 302 BEGIN ADDRESS FOR CURRENT DAILY REPCRI 
4300 6798 0n014 0006 0857 w3 DM Cé 303 BEGIN ADDRESS FOR CURRENT WEEKLY REPORT 
4305 6808 0001 0006 0858 M3 O™ C6 304 BEGIN AMORESS FOR CURRENT MONTHLY REPORT 
#310 68190 ono! 0n06 0R59 OM C6 305 NEXT WOR FILE AOQNRESS 
8315 6816 onoi 0006 0860 OM Cb 306 NEXT ERROR FILE ADDRESS 
4320 6822 0001. 0006 OR61 OM C6 307 NEXT YESTERDAY'S ENDING ADORESS 
&325 6828 onoi 0006 © 0862 DM C6 308 REGISTER REPORT TOTAL FILE NEXT ADDRESS 
8330 6834 n001 0006 0863 DM Cé 309 COMMON WORK FILE NEXT ANDRESS 
4335 6840 0001 0006 0864 OM Cé 310 AUDIT RESISTER TOTAL FILE START ADDRESS 
#3490 6846 nn01 0006 0865 DM C6 312 
8345 6852 nao 0006 0866 PM C6 311 AUDIT PEGISTER TOTAL FILE END ADDRESS 
#359 685R an0i ; 0006 0867 DM C6 313 
&#35S5 686% 0n01 0006 0868 DM Cé 314 
4360 6870 no01 006 0869 OM Cb 315 
&365 6876 0001 0006 0870 DOM Cé 316 
&370 6828? 9001 0010 0871 OM C10 317 
&375 63892 n000 - ©6100 0872 GRSYS4& OM OC10N0 |! FOURTH SECTOR OF THE TABLE 
4380 6892 000i OnNN6 0873 B44 OM Cé 402 NEXT OAILY PRINT IMAGE ADDRESS 
&385 689R ; 0001 00064 Q87% W4 DM Cé 403. NEXT WEEKLY PRIPT IMAGE ANDORESS 
€390 6908 0001 0006 0875 Ms OM Cé 404 NEXT MONTHLY PRINT IMAGE AUORESS 
4395 69106 . ono! 0006 0876 OM Cé &05 
#400 6916 oooi 0096 0877 DM Cé 406 
&405 6922 noo! 0006 0878 OM C6 407 
8410 6928 0001 0006 0879 D™ C6 408 
#415 6934 0001 0006 O80 OM C6 409 
6429 6940 oa001 0006 088i DM Cé 410 
4425 6946 ono! 0006 OR82 DM C6 411 
4430 695=P 0001 0006 0883 OM C6 sie 
4435 6958 0001 0006 0884 OM Cé 413 
4449 6964 0001 00N6 0885 ODM Cé 414 
&4aS 6970 0on01 Oon06 0886 OM C6 415 
450 6976 onoi 0006 0887 DM C6 416 
#455 698? 0001 0006 OR 88 OM C6 417 
#460 6988 0n01 0004 0889 OM C4 418 
4465 08390 «& 
4470 08gg9i 3» » * HH He Be BE RRR HE KH HRS HH RK HE BSB A KR HEHE RHE HE BE HE HR HH HS SF 
&475 OR9S # 
4480 0893 CONSTANTSs WORK AREASs I/0 BUFFERS», MESSAGES AND TABLES 
#485 0894 * 
4490 ; OR 95 » % © #@ % we» RR Be RH He RB HR BR HR HR HS ASK KR HE He HR HE HE HR HE KR HB HR SH 
4495 OR96 * 
4500 699? 2 0001 0001 0897 YwO DM Ctet 


Gi 


( 
SYSTEM TEN | 1! NFR200 @ 


RASA INTERFACE WITH 10/11/71 PAGE 0017 
SEQe LOCN INSTR/AATA OP ASR MY B/S NY LINE IMAGE C 
4560 6992 3 0001 0001 OR98 THREE DM ci*3! 
4545 69956 4&4 0001 0n01 0899 FOUR DM Citat 
#505 6995 6 relekep! ono. 0900 SIX DM C'é! 
&575 6994 0012 nn01 0004 O901 LSTFLE OM Crtooi?! 
4580 7000 000000 0001 0006 029072 ADRA OM c'000000! 
4585 7006 7795 0n01 ONOS 0903 LINEAD OM AtLINE! 
4590 7010 0O c001 0001 © 0904 CNT OM co? RETRY COUNTER 
#595 7011 on01 0020 — 0905 COMND OM C20 
4600 7031 0n0oi 0015 0906 STRSTP OM Ci5 
4605 7046 NFRO1N nn01 0006 0907 BNSS OM C'NFROIO®. CONTROLLER PROGRAM NAME 
&619 7052 MOTSGR ono 0006 0908 “OTSGR DM C'MOTSGR!? MOTS PGM NAME 
4615 7060 UsSSANNNNNN 11 4310 § 0 0000 940 9909 ®8CUPOT BC UPDATI5) REPLACE 330P 
4620 7070 vePnnAnANnNnNnN 11 PN10 § 0 9700 4 0 0910 ‘iNSR BC SRVCE:(5) 1/2 IGNORE SERVICE REQUEST 
#6725 7O8N uUPEANANNNN 11 2010 § 097700 00. o9i!1 BC SRVCE(5) 2/2 IGNIRE SERVICE REQUEST 
4639 7090 AOD 9001 0c03 0912 ADD DM Chand? 
#635 7093 OELETF ono! 0006 0913 OELETE OM CIDELETE! 
46490 7099 CHANGF 0001. 0006 0914 CHANGE OM CICHANGE! 
4645 7195 ECuU on01 0003 0915 E0J OM CrEOu! 
4650 710R NAFUN nn01 9005 0916 NAFUD OM CNAFUO! 
#655 7113 * 0001 0002 0917 act OM Ct a! 
#660 7115 015 0001 0018 0918 DATIN CM CrO1LE ' 
9665 71323 O2stNnval In 0001 0027 0919 INVAL OM CIrO24INVALID ENTRYe RE@ENTER?! 
4570 7160 O13ENND OF 000i 0016 0920 TMPEND OM C'013END OF PHASEs! 
8675 7176 O4RNSTART C nno01 0051! 0921 PRLMSG OM C'OeRSTARY CREDIT FILE UPDATE INTERFACE @ ENTER PHASE?! 
#680 7227 O35FNN CRE Nn01 0038 0922 ENOMSG DM CIO3SEND CREOIT FILE UPDATE FROM CONSOLE! 
®685 7265 O?P7CAMMIINT ono! 0030 0923 NOAVL OM C'O27COMMUNICATIONS IN PROGRESSe? 
&690 7295 O30SYSTFEN 0001 0033 0924 NNUP DM C'O3CSYSTEM NOT IN SYS!P COND)ITIONe! 
&695 7328 71223 0003 0004 0925 ANINV DM AtINVAL! 
®700 7332 7149 n001 0004 0926 ALTMPE OM At TMPENO!? 
&705 7336 7176 ono! on0s 0927 ADPL OM A'PRLMSG! 
47190 7340 7115 0001 0004 0928 ADOTIN DM A'DATIN! 
®715 738668 7227 0001 0004 0929 ENDADD OM A'ENOMSG! 
&720 7342 7268 onoi O004 0930 ANAV OM A'NOAVL!? 
8725 7352 7295 0001 0004 0931 aADUP DM AtNOUP' 
&730 735h ALTGN FORM 0n01 0053 0932 ALMSG DM CIALIGN FORMSs HIT SERVICE REQUEST ON THIS DEVICE ONLYe! 
#735 7409 ENTER FIRS 0001 0035 0933 REPMES DM CtENTER FIRST PAGE RESTART CODE y 
S740 74446 ENTER LAST 0001 0027 0934 MESREP DM C'ENTER LAST PAGE INFORMATION! 
4745 7471 SEE OPERAT 9001 0035 0935 MSREP OM CISFE OPERATOR'#?tS MANUAL IF NECESSARY ! 
4750 7506 HALT PRINT ono 0020 0936 HLTMSG OM CIHALT PRINT» a? 
4755 7526 RETIIRN TO 0n01 0030 0937 -DM CHRETURN TO NORMAL MOTS ROUTINES! 
4775 7556 MSG 32eNT 0001 0n4&9 03938 PROC3A DM C'*4SG 3 = DIFFICULTY ENCOUNTFRED IN ATTEMPT TO 1 Oad? 
4780 7605 e § 0001 0035 0939 FROC3B OA Cc’ e SYSTEM VILL RETRY 190 TIMES! 
®785 7640 MSG & @ 0001 0n47 0940 PROC4SA OM C'MSG 4 @ FAILED TO LOADe SYSTEM DEFAULTS ° 
8790 7687 TO MNTSe S n001 0030 0941 OM C'*TO MNTSe SEE OPERATOR''S MANUAL? 
#800 7717 UNARIE TO n001 0046 0942 ROOTAB OM CtUNABLE TO LOAD OF BIOTSTRAP AT SECTORS 3 & 4 * 
4805 7763 S/R FROM Nn 0001 0032 0943 NNOO DM C!S/R FROM DEVICE NOT ALLOAASLEe! 
4810 7795 an00 0001 094%& VOIDBF OM OC} 
®815 7795 0180 0001 0945S LINE Om 180C1 
4820 7975 0060 0027 0946 MSGTAB OM 60C?7 
4825 0947 « 
4830 9595 0200 0948 EXEC ROX 
#835 9595 0949 END 


SYSTEM TEN 


YP 


t 


LNTH 


0002 


0n10 


0004 
o0no3 
0010 
0094 
0004 
5094 
0006 


0006 
0010 
00494 
0004 
0010 
0010 


| 
© 


0010 


0053 
0010 
0010 
0006 
0006 
0010 
0010 
on0nt 
0010 
0046 
on10 
9010 
0006 
an10 
0010 
0010 
ooto 
0010 
0096 
0003 
0010 
0010 
0010 
0001 
0010 
0010 
0001 
nnot 
0n?0 
0010 
0010 
0001 


0010 
0010 
0010 
0010 


MBIFR If 
ANMRESS LINE 
7it3aP 0947 
P38NP 0147 
734a2P 0930 
7OSOP 091° 
4&2h40P 08462 
7340P O92R 
73P8P 0925 
7336@P 0927 
?99 4P 0? 61 
7OANP 990A 
6320NP 0O75R 
723222P .909?4 
7289P 0931 
&RQ0P 0552 
—32080P 0773 
2NS0P 0774 
7384P 0932 
B&ANP 0625 
RRROC 0035 
67ha&P ORSN 
GhA4P OR29 
7NANP 0NAaC9 
60R0P 072A 
en?PacC 6AN31 
6410P 0770 
771 7P 0942 
s99nP 07n2 
S8970P 0700 
70&6P 0907 
5O40P 0571 
2260P 0133 
2290P 0142 
2320P 0145 
P3ARNP 0155 
7NS9P 0914 
aOSR7TP 0565 
S3A0P 0615 
aNSNP 0433 
392NP 0411 
7N10P 0908 
8920P 0558 
S370P 614 
11RRC KN2G 
1wanr nnea 
7nt11P 09086 
2910P 0329 
21N0P 0105 
5180P 0582 
§7anP 0659 
5§750P 0660 
57H0P 0641 
S77NP NAAA 


NF R200 


SYMAOL 


ACT 
ACTWKS 
ADAV 
AON 
ADNSME 
ADDTIN 
ANINV 
ADP}. 
AD 


ADRA 
ADRS 
AD TMPE 
ADuP 
AGAIN 
ALFRM 
ALFRM1 
ALMSG 
ANYMSG 
ASK4&IT 
BATCHE 
BaTCHS 
BCUPDT 
BLIMP 
BLOKAC 
BMPR ~° 
BOOTAB 
BOOTER 
BOOTSN 
BOSS 
CARRET 
CENTOI 
CENT4 
CENT1IS 
CENTS 
CHANGE 
CHCNT 
CkHSw 
CILaapP 
Crupen 
CNT 
CNTCH 
CNTSP 
COMRIIE 
COMFIG 
COMND 
COMRS 
COMTER 
CR 


CRIN 

CRIN 
CRIN® 
CROUT 


$0462 
E0154 
U0 457 
Uu0435 
E0436 
U0433 
U0 449 
UN428 
$0196 
tiN640 
$9761 
$0317 
E0532 
0490 
U04&S5e2 
ENSé1 
E0144 
$0355 
U0274 
E633 


RASA INTERFACE 


MC #8 
BC oA 
“MC A 
C oA 
BC eA 
MC oA 
MC e@A 
MC @A 
MC =B 
MC @A 
MC @B 
MN #8 
RC @B 
MC oA 
MC eA 
AC eA 
AC @B8 
“C 9A 
ry | 
BC oA 


SO464 


U04&72 
So0271 
U0720 
110318 
€0533 


£0619 
E0158 


NOT REFFRENCEDe 
NOT REFEFRENCEN « 
NOT REFERENCED. 


UN418 
E0739 
UuN413 
E0775 
UN703 
E0709 
EN674& 


. UN676 


ENS70 
FQ119 
eo1e2! 
—0159 
eo0123 


4C oA 
AC oA 
C eof 
AC eA 
w @A 
BC @A 
BC 8B 
MC oA 
AC oA 
AC eA 
AC eA 
RC oA 
RC oA 


E0701 
$0688 
E0619 


NOT REFFRENCEDe 


$0556 
$0378 
EN&s8 
E0125 
$067? 
E0557 
ENS79 
SAHRA 
UC4&70 
$0116 
wua3s72 
eECc100 
uo102 
uUNSOS 


- U0684 


$o351 
$035? 
$0353 
ENS74 


A 8 
MN #8 
AC oA 
RC eA 
MC #8 
BC A 
AC #B 
MC #8 
C #8 
R eA 
“Ml @A 
BC eA 
w oA 
W o@A 
Ww oA 
MC #B 
MC #-B 
MC #8 
AC A 


$0568 
$0558 
E0492 
£0183 
$0682 
E0580 
E0615 
U0484 
$0485 
U0118 


$0239 
U0115 
uosi2 
UN702 
EOS74 


E0620 


WITH MOTS SYStud 


MC 


MC 


BC 
BC 


BC 
MC 
BC 


=A 


=8 
ay) 


@A 
@B 


oA 
#68 


#8 
#8 
#68 


@8 
#8 


eA: 


oA 
#8 
| 
oA 
wA 
@B 
=B 


ke) 
2A 
eA 
aA 
#8 


oA 


uc4s8e 


$o2ge2 
UN738 


U0320 
E0722 


E0242 


$0578 
$0569 


E0610 
SO484 
u0120 
$0254 
U0126 
vo515 


E0620 


MC 


MN 
MC 


8C 


A 
MN 


BC 


eA 


#8 
@A 


=A 
a) 


@8 


oA 
#8 
8 
ad 
=A 


mA 


#8 


ud293 
9739 


yO322 
E0731 


E0258 


C 
MC 


C 
BC 


8C 


SSREFERENCES #8 | 


oA 
oA 


=A 
8 


8 
eA 
eA 


10/11/71 


V0311 C 
$0743 MC 


E0275 8C 


vo124 C 


SO382 MN 
UO287 WwW 
UO0641 W 


#A 
“8 


-B 
oA 
eA 


PAGE 90018 

UO313 C w4 
$0758 A 08 
E0326 BC eA 
$0419 MC @wB 
U0295 W eA 
U0660 W eA 


Yos30 C 
U0759 C 


$0354 MC 


U0297 WwW 
U0678 WwW 


2A 
A 


@A 


#A 


t 


, ( 
SYSTEM TEN O13: FR II 


TYP 


t 


LNTH 


9010 
onal 
0006 
0006 


0006. 


2006 
9010 
0008 
0018 


ono! 
0001 
0001 
NN06 
0on10 
0091 


0010 
0010 
C10 
0091 
ono 
0001 
0004 
0038 
90nt 
0010 
0001 
0003 
0003 
0010 
ono1 
0n05 
0010 
0010 
0005 
0010 
0001 


0010 
0001 
onni 
0n10 
0010 
0100 
0100 
0100 
01900 
0010 
0010 
0010 
0020 
0010 
0006 


SO30P 
5249P 
6592P 
669?P 
679eP 
6892AP 
a3ssoPp 
&7R4&P 
7145p 


048580. 


35N8P 
3507P 
7093P 


“PRP 


352°5P 


3830p 


3810P 


6NSOP 
0420P 
25N4P 
3509P 
734 4P 
7227P 
OAROP 
&ANNP 
17a7F. 
71n5eP 
§?e5P 
270NP 
40760. 
22758 
BRaOP 
SR5nP 
PROSP 
2710P 
2929P 


&&R0P 
6994P 
n3760 
6500P 
6550P 
&592P 
6492P 
&792P 
6R297P 
55QNP 
5ANAP 
6510P 
7506P 
5570P 
65R6P 


ANDRESS LINE 


0570 
9602 
OR17 
ORARK 
OR 56 
O&873 
0311 
O854 
N918 


0021 
o0a31 
0330 
9913 
046% 
0343 


N34 
0340 
0719 
0071 
0329 
0332 
09329 
092A 
0067 
0514 
0027 
9915 
0895 
02190 
n029 
0134 
0677 
N478 
Nees 
0211 
7250 


0496 
oOR9g 
NA16 
0784 
0797 
OR16 
0837 
0855 
0872 
0641 
NA4?P 
0789 
0936 
0639 
0201 


NF R200 


SYMBOI. 


DAYNRS 
DBU 
DEE 
OF LF TE 
DEL SME 
DE VCD 


FNL™SG 
FOUR 
FREE 
GE TIN 
GETTR 
GRSYS1 
GRSYS? 
GRSYSA 
GRSYS&4 
HALT 
HAIT4 
HE AND 
HLTMSG 
HL ISW 
HOMADF 


2 RBSA INTERFACE 
$0376 MN =B $0562 
$0719 MC #8 $0729 
UO311 C 8 Ud320 
U0313 C #8 UN322 
U0N196 MC eA Uc199 
v0O199 C #8 U0536 
EG304 RE oA 
NOT REFFRENCEDe 
UO435 CC =6 U0 437 
SO482 MO &B Uu048&3 


NOY REFFRENCEDe 


UN305 C A 

UN303 C eA 

VU0437 Cf @A 

EN43R RC A 

$0340 MC =B $0344 
Uq3I50 MC &A VO351 
U035S7 MC ©A U0358 
EN142 BC eB E0155 
E0240 RC 8 E0255 
E0203 af ef £0205 
E0183 AC #8 

UQ204 A eA U05S4 1 
UO307 C oA 

U0497 MC A 

Uun929 OM 

E0105 RC eA E0389 
E0434& AM eA E0473 


NOT RFEFFFRENCEDe 
UNS41 C =A U0476 
U02N9 C A U0474 
NOT REFFRENCEDe 


$0426 MC =B $0496 
UN12P7 Ww @A 

Uu0675 MC eA 
EN677 RC -B . 
WOL9e WwW @A Uu021?2 
$0193 MN 8 €0210 
UC221 MN @A uo324% 
UN382 MN @A U0427 
U0647 MN e@A U0745 
EN84?2 AC @A E0477 


NOT REFFRENCEDe 


U0243 C eA UuN652 
FO019% BC eA E0269 
UO7R1i MC @A 

U0768 W eA $0797 


NOT REFERENCED. 
NOT REFERENCED e 
NOT RFFERENCEDe 


$0349 “C eB E0643 
SC350 MC @B 
£0751 AC #8 
S0640 MC 8B U064e2 
S0373 MN @B $0656 
U0767 MC =A U0799 


BC 


Ww 
MN 
R 


=B 


U0345 
v0352 
Uu035S2 


E0540 


U054s3 


UN2P5 
So2i4 
U0373 
U046e 
U0746 


vu0798 


MC 
Nc 
MC 


BC 


W 


@B 


eA 
#3 
aA 
°B 


bell 


eA 
oA 
oA 


o8 


=A 


@A 
@8 
@ A 
oA 
oA 


U0474& 


U034%6 
U0353 
U0360 


E0S4&e2 


130545 


$0221 
VU0375 
U8562 
UN74&9S 


MN 
MN 
MN 
MN 


SeREFERENCES ae 


=A 


oA 
oA 
oA 


oA 


-8 
oA 
=A 
ai 
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U0476 


U0347 
U0354 
U0361 


MC 
MC 
MC 


@8 


oA 
oA 
oA 


$0374 MN =8 
U0377 MN @A 


V0OS69 


MN 


oA 


PAGE 0019 


U0743 


U0481 


U0348 


U0355 
U0362 


MC 


MC 


MC 


¥C 
MC 


oA 


oA 


@A 


oA 
oA 


U0378 MN A 


U0S72 


MN 


o#A 


SO4#8i 


U0349 
VO356 
UC363 


MC 
MC. 
MC 


| 


>A 
“A 
4 


U0379 MN eA 
U0609 MN 4 


SYSTEM Qoocus ER YI 


TYP 


t 


LNTH 


. 0001 


0008 
0004 


(0003 


0010 
0010 
0010 
0027 
0010 


9010 ° 


0010 
0010 
0010 
0010 
0010 
0005 
0010 
0010 
0001 


0004 
0010 


00048 
0004 


0010. 


0006 
0006 
0006 
0006 
0006 
0027 
0010 
an10 
0010 
0010 


000? 


0010 
0004 
0004 
on04 
0027 
0010 
00?7 
0010 
0035 
0010 
0005 
0010 
0032 
0030 
0010 
0n10 
0010 
0010 
0033 


ANDRESS LINE 


6445P 
5345p 
6NG4P 
5545p 
2nNn0P 
&349P 


| 2230P 


74133P 
&190P 
&5a0p 
&550P 
&5R0P 
&59NP 
&#610P 
&A6ANP 
0375P 
2420P 
6250P 
7795P 


7ONGP 
6219P 


41N6P 
6994P 
§720P 
64N4P 
67N4&P 
6RN4P 


69N4P. 


7OKPP 
Jee 4P 
2510P 
3330p 
&7A0P 
&720P 
5&eRP 
&5A0NP 
2eRbP 
SA76P 
PeeAP 
0377¢. 
SAeOP 
7975P 
PRANP 
74&71P 
PRI0P 
7410RP 
294aNP 
7743P 
7?45P 
374nP 
7N70P 
&?PanP 
&>20P 
7295P 


0777 
0412 
0725 
0635 
0269 
0762 
0126 
0919 
0443 
05085 
0506 
0512 
0513 
0515 
9516 
0068 
0170 
0748 
094§ 


0903 
0754 


0728 
0901 
04546 
0819 
OR 40 
N858 
NR75 
0908 
0934 
0191 
0309 
0539 
0536 
04236 
0807 
0181 
451 
0173 
0017 
0646 
0946 
12463 
0935 
0727 
0916 
0254 
N94&]A 
0922 
0372 
0910 
0457 
045? 
0924 


NF R200 


SYMROL 


HOWMNY 


166 
LABEL 
LAARLTS 
LETSGO 
LINE 


LINE AD 
LINK 


MSGPT1 
MSGPT? 
MSGQ 
MSGSW 
MSGTAR 
MSGTST 
MSRFEP 
MURRY 
NAFIID 
NICKI. 
NNON 
NOAVIL 
NORML 
NOSR 
NOTAV 
NOTUP 
NOUP 


U077? 
$0604 
uos9g0 
U0586 
£0143 
ENS3? 
E0117 
UNS16 


EQ442 | 
$O420 | 
$O4se2i 


$0422 
$0423 
$0424 
$0425 
U0170 
E0069 


- E0741 
U0206 


UN563 
un202 
e0209 
EQ759 
U0560 
U0N74&0 
E0105 


~~ = = 


RASA INTERFACE 


Cc 
MC 
MC 


BC 


#8 
@6 
@A 
8 
@B 


oi 


°B 
aA 
#8 
#8 
#8 
#8 
@B 
ad =) 
e8 
oA 
8 
oA 
“8B 
oA 
oh 
oA 
@A 
7A 
8 
8 


U078&9 


U0605. 


UCS92 


UOS88~ 


E0156 
E0533 
£0128 
uos2e5 


—EO0S07 
E0517 
E0517 


U0174 


Uu0209 
U03903 
U0S39 
E0207 


U0618 


E0106 


NOT RFEFFFRENCEDe 
NOT REFFRENCEDe 
NOT RFFFRENCEDe 
NOT RFEFFRENCEDe 


U0688 
U0296 
E0134 
E0308 
£0531 


E0529. 


UuUN632 
E0429 
0654 
u0625 
0625 
UuN243 
$0377 
uo173 
EQ247 
UN29R 
U0387 
uo124 
£0179 
$0101 
U0930 
EN2264 
uo0419 
EN412 
EN414 
ung31 


MC 


oA 
oA 
oA 
=A 
-8 
eA 
oA 
oA 
=A 
eA 
=f 
@8 
oT) 


=A 
oA 
oA 
oA 
oA 
ef 


#f 
ef 
@ {3 
#5 


E0171 


U0653 


- €0447 


$9637 
U0N628 
U0649 
$627 
U0177 
E0259 


U018e2 
U0103 


E0498 


ee em eee eee = ee 3 - es ee 


WITH MDTS SYSTEM 


10/11/71 
#*REFERENCES** 
MC =A 
WA 
MC “A U0597 MC =A 0603 NC =A 
C ep 
BC -B E0241 BC -B €0256 BC -B 
BC =A £0722 BC =A €0731 BC ©A  €0760 BC a 
BC =B | 
OM 
BC =B 
BC @A 
BC =8 
C A wu0178 C #A 0182 C <8 
C -B vo2e18 W eA V0SS3 C -B8 vOSsS C =B 
DM 
MC eA 
BC A £0537 BC =A £N548 BC “A U0744 MN @A 
C eA 
BC =B8 E0389 BC =8 £0390 BC =8 £0538 BC A 
BC oA 
A eA 
BC eA £0491 BC =A £0499 BC 8A 
MC ©B 
MN ©A $0632 A ©B $0638 MC =B 
MC @A §0652 MC =A 
MN -B €0639 BC =A $0647 MN @B 
OM Wo181 OM U0K30 W @A $0649 MC =B 
BC #A 
C A 
WoO 
BC -B £0644 BC =A 


PAGE 0020 


U0547 C oA 


E0747 BC =A 


E05&6 BC mA 


u0651 DK 


“OSS2 C ofA 


UO0748 “4N #4 


E0549 8C ea 


SYSTEM reQDeere FR ft 


TvP 


T 


LNTH 


0010 
onot 
0003 
0010 
0001 
0010 
0010 
00190 
0010 
9010 
oon 
0010 
0010 
0051 
on10 
0019 


0010 | 


0049 
0035 
0087 
0051 
0010 
0010 
a010 
0010 
0010 
0004 
0004 
0004 
0010 
0010 
0010 
0010 
0010 
0035 
0010 
ona 
0010 
0010 
0010 
0010 
0010 
ooot 


0019 
nN0n1 
9005 
0005 
0005 
n010 
9010 
0010 
0006 


O0N6 


0010 
0n10 


ANDRESS LIne 


6N20P 
N346C 
2926P 
6123NP 
3505p 
&510P 
2R50P 
&&ENP 
654NP 
ananp 
91R0C 
B150P 
2590P 
71742 


2 R10P- 


6179P 
2570P 
7584P 
7605P 
7A8OP 
€377C 
&100P 
64480P 
&290P 
&REOP 
&750P 
0011P 
aneiP 
anaiP 
&57P 
&AaNP 
60ANP 
6140P 
6540P 
—7an9P 
&EANP 


. 6270P 


20n0P 
5R19P 
S7ROP 
57909P 
PAaNP 
N3annp 


&RANP 
HAR 5P 
278 5P 
64145P 
§135P 
SS8NP 
ANROP 
2R&OP 
A0N&4P 
601 4P 
39NNP 
3730P 


0707 
0019 
0249 
O7A1 
A322 
0499 
0? 39 
N&90 
0792 
0?72 
0037 
0738 
9199 
N9P 1 
N225 
9740 
0197 
0938 
0939 
0940 
0933 
0726 
0773 
0768 
0549 
OS3R 
0049 
0N53 
0057 
0511 
0527 
0770 
073A 
O79R 
0933 
0529 
0750 
0n9e 
0674 
0664 
0672 
O138A 
0064 


0846 
0834 
0217 
0734 
058A 
9437 
0708 
P28 
N711 
0706 
N3R#K 
903264 


NF R?OO 


SYMBOL 


NXST 
NXPIC 
OHFNUR 
OK 
ONE 
OUuTY 
PENNY 
PHSFND 
POSTN 
PRELM 
PRESET 
PRFLE 
PRIACT 
PRIMSG 
PRATDN 
PRNTFL 
PRNTR 
PROCGS3A 
PROC3A 
PROC 4&A 
PSFIAG 
PSPR 
PUTOUT 
PUTTR 
QUATSW 
QUITSWw 


RED1 
RE i PUT 
REPMES 
REPSW 
RE PSW14 
REQAST 
RETRY 
RITN 
ROLLER 
RONI. 
ROX 


RPSw? 
RPTFLG 
RRi PR 
RRPRN 
RRREP 
RS YMSG 
SANDLE 
SCURMN 
SEC3 © 
SEC4 
SE TRK 
SE TWRT 


e RASA INTERFACE 
EN7O01 RC A E0708 
NOT RFFERENCEDe 
Uu0S76 C #8 
EN721 38 @A 
1N485 MC wA U0496 
E0453 RC @A E0458 
ENi75 BC A 
EN475 BR @A 
EN751 8C eA 
FO0143 RC eA E0156 
FO0035 AC @A 
EC2O07 AC @#B E0548 
EC228 BC @A 
u0927 DM 
FOI3R SC @A Eo2o1 
EN209 RC 3 E0537 
FO0201 3SC #8 E02C8 
UN680 WwW eA 
S0679 Mf 8 
S0685 MC @B U0686 
UN411 C oR $0427 
E0721 BC #8 
E0753 BC e@A EO7R? 
SO7S8e2 “CC e838 E0769 
SO0384 MN $0528 
SO3R5 MN eB $0527 
S0550 MC eA $0567 
$0551 MC o#R $0559 
$¢ci95 MC #8 $0270 
E0434 AC -B E0473 
E014&& AC =-B EQ2&46 
S020? MC @B $0204 
EN203 BC eA E0205 
UN752 MC #A UN7&3 
UC2RR W eA 
S03?5 MN @f $0379 
$0374 WN #B $0380 
E0039 BC -B- £0147 
EN6832 RC eB E0689 
EN0148 AC eA EQ 244 
—€0073 BC @A 
UN133 MC A | 
FO128 BC oA E0150 
EQSCO AC eA E064§ 
SO381 “N #8 S0534 
NOT REFERENCED e 
ywO118 C oA vuo1i70 
U012N CePA U0174% 
wole2e CC eA U0178 
EN626 RC #38 
E0674 BC e@A 
0191 MC eA 
UN700 R- #B 
UN707 RR @#B . 
FO?2?6 BC @A E0498 
E014? AC @A £0155 


WITH MOTS s(n 


BC 


BC 


BC 


@B 


 @A 


aA 


oA 


6 


oA 
-B 
8 


ad 
#B 


=A 
#5 
@B 
eB 
-B 
-B 
of} 
@6 
-B 
adh >) 
#A 
oA 


«8 
#@B 
#8 
oA 
“A 


eA 
eA 
#6 


#8 
°8 
@B 


oA 
oA 


E0241 


£0208 


E0791 
EQ771 


$0746 
$0608 
uC5é69 
$0302 


E0538 


$0539 
E0549 


EC245 
E0246 
E0215 


Ud948 
E0544 


£0644 
E0249 


BC #A 


BC oA 


BC oA 
BC A 


MN © 
MC 93 
Cc #8 
MC #6 


BC #4 
MC #68 


BC oA. 


BC A 
BC @A 
BC oA 


EXEC 
BC eA 


BC oA 
BC =A 


E0256 


$0781 
$0749 


UN567 
$0309 


E0549 
S9541 
E0542 


E0278 


E0222 


BC 


BC 


BC 


*BREFERENCES 4a 


oA 


8B 


oA 
a>) 


8 
-B 
aA 


oA 


oA 


FO0255 BC wA 
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$0783 


u0508 
$0310 


E0723 


£0575 


&0227 


MC 


BC 


BC 


BC 


“A 
28 


oA 


oA 


=A 


$0790 


$0617 
U0740 


E0726 


E0646 


E0471 
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MC. 


RC 


BC 


BC 


oA 


eR 


wo A 


eA 


#f 


EC791 


U0618 
SO0742 


EQ730 


E0655 


E0486 


aC 


BC 


RC 


8¢ 


aR 


oR 


@A 


| 
SYSTEM -: ER IT 


TYP 


T 


LNTH 


ocot 
00%t 
0092 
00d! 
n010 
0003 


0010 
2010 
0010 
0010 


9010> 
0010 


0015 


0n10 
0010 
0010 
0010 
0010 
0010 
0010 
0008 
0010 
0010 
n010 
ono! 
0016 
0010 
onot 
0010 
0010 
0001 
0010 
ooot 
0010 


~0010 


0019 
0003 
onot 
0006 
0006 
0006 
0006 
0019 
0010 
0010 
0006 
oon! 


0010 
0010 
0010 
0010 
no10 
0010 


ANNRESS LINE 


P04 AP 
6995P 
RPaRP 
§249P 
sasop 
&906P 


a92nP 
Pnio0P 
PARNP 


— 6370P 


6470P 
PATOP 
7N21P. 


5150P 
5?-R0P 
5210P 
5220p 
5?50P 
5270P 
5290p 
PaAAP 
2100p 
5N90P 
5470P 
6993P 
7160P 
6570P 
1210P 
2740P 
279NP 
699P 
&31NP 
7795P 
Se10P 
S&4NP 
5420p 
5245P 
S2nRP 
659RP 
6&A9RP 
679RP 
RRP 
&9ROP 
2349p 
a5n0P 
&5R0P 
2n1SP 


643NP 
2370P 
2170P 
2120P 
29A0NP 
PTHOP 


6096 
900 
9596 
1613 
0614 
0555 


9557 
0093 
D208 
0764 
0781 
0201 
0904 


0584 
0604 
0590 
0592? 
0597 
0603 
0605 
0177 
0779 
0576 
N449 
0898 
n920 
0799 
0077 
OP 14 
0221 
897 
0470 
0944 
Nh20 
0423 
OP 1 
0600 
Nant 
NRiR 
0839 
O887 
0876 
9569 
0310 
03°76 
NRNN 
0095 


0772 
0754 
N1N6 
0115 
0390 
NPR 


NFR200 ® RASA INTERFACE 


SYMBOL 


SE VN 
SIX 
SLASH 
SPACE 
SPC 
SPCNT 


SPSW 
SRVCE 
STAPSW 
STATAB 
STATARL 
STOPSW 
STRSTP 


TAB 
TAB1 
TARIO 
TAB1I12 
TARIP 
TARI3 
TA8? 
TABRST 
TABSET 
TABSP 
TRLMSG 
THREE 
TMPEND 
TRACKR 
TRCFR 
TRNOFE 
TURNON 
TWO 
UPDAT 
VOINBF 
VTAB 
VTAR1 
VTARA 
VTCNT 


VICTL 


Wi 

We 

W3 

W4 
WCHR 
WEEKLY 
WHANA 
WHERE 
WHOM 


WHONXT 
WKSACT 
WKST 
WKSTEN 
WKSTRS 
WRTEN 


UN097 . 


Uo309 
Ud204 
UO0315 
E0553 
$0573 
So539 
$0375 
E0039 
S$N198 
E0753 
EN194 
$0197 
$0290 
uec3i5 
EC577 
EN585 


£0587 


EN587 
E0589 
E0589 
$0346 
0637 
EQN144 
E0557 
EN2&s 
U0464 
UN926 
u0790 
E0069 
E0211 
EN219 
UO3R1 
EN463 
$0720 
E0535 
E0278 
$0347 
UN623 
UN6e21 


C A 
A A 
C A 
C A 
AC ©A 
MC #8 
MC #8 
MN @B 
RC eA 
MN #8 
BC =B 
RC ~B 
MN #8 
R A 
Cc =B 
RC @A 
AC @A 
BC #A 
RC =B 
RC eA 
RC =B 
MC 8B 
MC @A 
AC oA 
RC #8 
eC =8 
MC A 


MC A 
AC oA 
BC oA 
RC =B 
MN @A 
RC @A 
R oA 
BC eA 
BC #8 
MC #8 
WwW @A 
Ww A 


UO344 
una31a 
U0547 
udN411 


U0576 
$o539e 
$0572 
E0104 
S0384 
EQ7#2 
EN269 
$9383 
UN29e 
U0317 


E0591 


U0638 
E0158 


$0653 


E0219 


E0465 


E0546 
$0348 


NOT REFERENCED. 
NOT REFFRENCEDe 
NOT REFFRENCEDe 
NOT RFEFFRENCEDe 


$0345 
EN306 
EN157 
SQA767 
E0Q92 
U0423 
EN769 
U0146 
FO0098 
FO106 


MC 28 
RC A 
BC -A 
MC #B 
RC eA 
MN @A 
BC @A 
MC oA 
RC wA 
HO oA 


E0615 


E0257 
U0768 
U0097 
U0424 


$0133 
EN350 


NOT RFEFFFRENCEDe 


FaGP1LO 


BC eR 


E220 


wee eee 


WITH MOTS S¥sfEM 


MC 
BC 


BC 
MC 


oA 
oA 


28 


oA 


oA 


aA 
“6 


oA 
#8 
#8 
oA 


#fR 
=A 


=A 


UO74&2 


uvd552 


Uv0578 
$0597 


S06tgo” 


£0147 


u0293 
UC318 


Fos93 


EQ24e 


U0654 


EQ903 


E0648 


E0316 
$0779 
Uuoog93 
UN4S?5 


$0145 


A 
C 
A 


MC 
MN 


BC 


BC 


BC 
Cc 


ac 


BC 


to pr 


MN 


a8 


@A 


@A 


eA 


oA 


of 
of} 
=& 
aA 


«8 
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e*REFERENCES as 
U0659 W eA VY0661 W eA 
$0579 MC -—B vOSR& C @A 
$0603 MC -8 vV0604 MC =A 
SN616 “4N =B 
E0245 BC -A £0910 BC WA 
$9300 8 ©A v0303 C =8 
U0530 C <8 
E0598 BC eA 
E0258 BC eA 
£0657 BC <A 
U0797 R ©8 VJ0798 W #8 
0101 MC #A YJO420 MN @A 


PaGE 0022 


U0586 


SO607 FC 


Cc 


€0Sti BC 


voe3scs C 


UO421 MM 


2A 
af 


oA 


of 


oA 


UOS88 
$0614 


0307 


c 
A 


t> 


@A 
#2 


#R 


UO422 MN eA 


| ( 
SYSTEM reQDsenn FR TT 


NFR?2O0O0 2e RASA INTERFACE WITH MOTS 10/11/71 ' PAGE 9023 
TYP ££  LNTH ANNRESS LINE SYMROL #*SREFERENCES 5% 

0010 6510P 1620 WRIMSG S0628 MN #8 

0010 &5aANP O5N& WRIR E0429 AC @B E0447 BC @-B E0491 BC @—B E0499 SC of 

ootn 948NC ON39 xXROX NOT REFFRENCEDe 

0010 3212?NP PRR YAW! $0357 “fC @B 

0010 2140P 0790 YAw? $0358 MC =B 

0010 3190P 127995 YAW? Fn2ees RC of E0301 BC =B E0308 BC «8 £0319 BC #8 E0321 BC =A £03273 Bf oA S0359 

0010 3P00P 07P9hH YAWSs ,$0360 MC eR . 

0010 27210P 0797 YAws! SO361 MC @B 

0010 3270P 798 Yawse S036? MC @B 

0010 9240P A3B0NN YAWSs $0363 MC 38 

0010 © 23110P OF87 YAWANT E0157 Bf &B £0257 BC @B E0289 BC #8 E0291 BC 8 E0294 BC #8 E0312 BC eA E314 

$0356 MC @#B 
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